Chart in Excel zeichnen: XLChartType einstellen

[messie]

Moin,

ich schreibe mal wieder etwas code und möchte beim Füllen eine Excel-Datei einen Chart zeichnen. Der lässt sich auch zeichnen, allerdings bekomme ich den ChartType nicht eingestellt.

Code:

var 
sheet, localchart : OleVariant;

begin
  sheet := Workbook.Sheets.Add(After := Workbook.Sheets[workbook.Sheets.Count]);
  localchart := sheet.ChartObjects.Add (200,200,500,500);
  localchart.Chart.ChartWizard (sheet.Range['A5:E50'],XLChartType.xlLineMarkers); //Compiler sagt: Undeklarierter Bezeichner: XLChartType
end;

Wenn ich den Chartwizard ohne XLChartType aufrufe funktioniert es. Da bekomme ich aber ein Säulendiagramm...
Wir stelle ich denn den ChartType korrekt ein?
Delphi 2009 / Office 2013

Grüße, Messie

[Chemiker]

Hallo messie,

die Säulendiagramme sind Standard, wenn kein Diagrammtype angegeben wird.

XLChartType ist eigentlich der Überbegriff für die Diagrammtypen-Konstanten.

Um einen bestimmten Diagrammtype zu ändern:

Gallery := xlLineMarkers

Bis bald Chemiker

[Jumpy]

Oder die Notlösung die fast immer hilft: Den Wert der Konstanten in der Excel-Hilfe nachlesen und dann in Delphi einbauen, also:

const xlLineMarkers=65;

[messie]

Zitat von Jumpy:

Oder die Notlösung die fast immer hilft: Den Wert der Konstanten in der Excel-Hilfe nachlesen und dann in Delphi einbauen, also:

const xlLineMarkers=65;

Danke, genau das war das Problem. Die Enumeration scheint nicht umgesetzt zu sein. Mit Angabe der Werte hat es erstmal geklappt.
Die andere Notlösung (Aufzeichnen und Auswerten von Makros) klappt in Bezug auf den Chartwizard nicht mehr, der wurde ja mit Excel 2007 abgeschafft.
Ich hoffe, jetzt weiterzukommen, indem ich in die erzeugte Datei Excel-Makros nachrüste.

Grüße, Messie

[Chemiker]

Hallo messie,

der Chartwizard funktioniert in Excel 2007 als auch in Excel 2016. Nicht die Konstante ist das Problem, sondern der Aufruf der Methode.

…..ChartWizard (Gallery := xlLineMarkers);

oder

…..ChartWizard (Gallery := 65);

Bis bald Chemiker

[messie]

Zitat von Chemiker:

Hallo messie,

der Chartwizard funktioniert in Excel 2007 als auch in Excel 2016. Nicht die Konstante ist das Problem, sondern der Aufruf der Methode.

…..ChartWizard (Gallery := xlLineMarkers);

oder

…..ChartWizard (Gallery := 65);

Bis bald Chemiker

Hm,

ging bei mir nicht, nur mit integer-Übergabe. Welchem Objekt ordnest Du denn den Chartwizard zu? Vielleicht habe ich da ein anderes?
Bzw. kann ich noch andere units über uses einbinden?

Grüße, Messie