Hallo zusammen,
eigentlich einfache Aufgabe, mit Delphi eine Excel Arbeitsmappe erstellen, dort 2 Arbeitblätter einfügen und das zweite Arbeitsblatt umbenennen.
Wird in vielen Beiträgen beschrieben, will bei mir aber nicht fehlerfrei funktionieren.
Variablen: Excel : Variant und WBOj : Olevariant
Excel starten:
Delphi-Quellcode:
try
Excel := GetActiveOleObject('Excel.Application');
Except
try
Excel := CreateOleObject('Excel.Application');
except
Showmessage('Excel konnte nicht gestartet werden!');
OK := false;
end;
end;
Arbeitsmappe anlegen (enthält automatisch ein Tabellenblatt):
WBObj := Excel.Application.Workbooks.Add;
Ein weiteres Tabellenblatt anlegen:
WBObj.Worksheets.add;
Jetzt möchte ich das zweite Tabellenblatt umbenennen. Die folgende Variante funktioniert einwandfrei, kurios ist hierbei jedoch dass Delphi eine
Fehlermeldung anzeigt : Undeklarierter Bezeichner 'Activate' in Zeile ... aber trotzdem Compiliert und fehlerfrei ausführt
Delphi-Quellcode:
WBObj.Sheets[2].Activate;
WBObj.ActiveSheet.Name := 'Neu';
Bei folgender Variante wird kein Fehler angezeigt, bei der Ausführung erhalte ich jedoch eine Fehlermeldung "Mitglied nicht gefunden"
Delphi-Quellcode:
WBObj.ActiveSheet := WBObj.Sheets[Nr];
WBObj.ActiveSheet.Name := 'Neu';
Eine oft beschriebene Variante funktioniert überhaupt nicht und wird auch nicht compiliert:
Excel.WBObj[1].WorkSheets[2].Name := 'Neu';
Wer kann mir hier ein wenig auf die Sprünge helfen
Gruß
Sidi61