如何将Excel中的元素（图表）定位到某个单元格？

我在Excel中有一个图表，我需要定位（移动）到某个单元格。

我正在寻找这样的一些东西：

procedure TMyExcelClass.MyProcedure; var sheet, chartObject: Variant; begin sheet := fExcel.ActiveWorkBook.Sheets['Some sheet']; chartObject := sheet.ChartObjects[1]; chartObject.Left := <Left of cell "F"> chartObject.Top := <Top of cell "34"> end; 

如何做位置图对象到某个单元格？ （考虑到单元可能具有不同的宽度和高度）

Answer 1

创build要定位图表的单元格的范围。 然后将范围的左侧属性和顶部属性分配给图表对象。

 procedure TMyExcelClass.MyProcedure; var sheet, chartObject, r: Variant; begin sheet := fExcel.ActiveWorkBook.Sheets['Some sheet']; r := sheet.Range['F34']; chartObject := sheet.ChartObjects[1]; chartObject.Left := r.Left; chartObject.Top := r.Top end;