Wie Position Element (Diagramm) in Excel zu einer bestimmten Zelle?

Question

Ich habe ein Diagramm in Excel, das ich in bestimmte Zelle positionieren (verschieben) muss.

Ich suche nach etwas in diese Richtung:

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; 

Wie positionierte Plan Objekt auf bestimmte Zelle? (unter Berücksichtigung, dass Zellen unterschiedliche Breiten und Höhen haben können)

Answer 1

Erstellen Sie einen Bereich der Zelle, in der Sie das Diagramm suchen möchten. Weisen Sie dann dem Diagrammobjekt die linken und oberen Eigenschaften des Bereichs zu.

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;