aloha...
kannst du das nächste mal bitte denn qt alls delphi code posten
du kannst im delphi die worksheets angeben die du erstellen willst und ihnen auch namen geben...
ich machs z.b. so:
Delphi-Quellcode:
//Create .xls / Set Column Format / Create Header
oleExcelApp := CreateOleObject('Excel.Application');
oleExcelWorkb := oleExcelApp.Workbooks.Add;
oleExcelSheets1 := oleExcelWorkb.WorkSheets.Add;
oleExcelSheets1.Name := 'test sheet 1';
oleExcelApp, oleExcelWorkb, oleExcelSheets1 sind alles variablen vom typ olevariant
edit
natürlich nicht das speicher vergessen ^^
das kann man so machen
Delphi-Quellcode:
//Save as .xls File
sXlsFile := ChangeFileExt(sFile, '.xls');
Try
oleExcelWorkb.Close(true, sXlsFile, False);
Except
ShowMessage('Save To File Error');
End;
/edit
´
dann kann deine normale verarbeitung erfolgen die du mit dem excel machen willst...
am schluss muss halt alles wieder freigegeben werden
Delphi-Quellcode:
//Excel freigeben
oleExcelSheets1 := Unassigned;
oleExcelWorkb := Unassigned;
oleExcelApp.Quit;
oleExcelApp := Unassigned;