Ja das habe ich auch gefunden, geht aber nicht.
Im beispiel wird halt mit einer Variablen "Sheet: OLEVariant;" gearbeitet. Dieser Wird dann wie folgt declariert:
Sheet := XLApp.Workbooks[ExtractFileName(AXLSFile)].WorkSheets[1];
Das klappt auch, aber wie gesagt nur mit dem ersten. Sobald ich aus der "1" eine "2" mache ist vorei und die Fehlermeldung kommt.
Sheet := XLApp.Workbooks[ExtractFileName(AXLSFile)].WorkSheets[2];
kann man die Zeile irgendwie umschreiben das es geht... verstehe auch nicht warum es überhaupt zur Fehlermeldung kommt...
Vielleicht irgendwie :
Delphi-Quellcode:
XLApp.Worksheets[2].Activate;
sheet := XLApp.Workbooks[ExtractFileName(AXLSFile)].WorkSheets.activated;