Dazu habe ich Folgende globale Variablen deklariert.
N
ame DataType Subtype Length
Excel Automation 'Microsoft Excel 11.0 Object Library'.Application
Book Automation 'Microsoft Excel 11.0 Object Library'.Workbook
Range Automation 'Microsoft Excel 11.0 Object Library'.Range
Sheet Automation 'Microsoft Excel 11.0 Object Library'.Worksheet
Chart Automation 'Microsoft Excel 11.0 Object Library'.Chart
...
Nun erstelle ich ein Excel Dokument mit mehreren Arbeitsblättern.
- Code: Alles auswählen
CREATE(Excel);
Excel.Visible(TRUE);
Book := Excel.Workbooks.Add(-4167);
Sheet:=Book.Sheets.Add;
Sheet.Name := 'Blatt1';
Sheet:=Book.Sheets.Add;
Sheet.Name := 'Blatt2';
...
Wie kann ich nun die einzelnen Arbeitsblätter selektieren, um Daten zu übergeben?
(Prinzipiell wie folgt:)
- Code: Alles auswählen
Sheet('Blatt2').Activate;
Sheet.Range('A1').Value := 'test';
Sheet('Blatt1').Activate;
Sheet.Range('A1').Value := 'test2';
Sheet('Blatt5').Activate;
Sheet.Range('A1').Value := 'test3';