Salü....
ich habe folgenden Code:
Code:
procedure TForm1.cmd1Click(Sender: TObject);
begin
if f_Excel(Excel)then // Excel startet
ShowMessage('MSExcel ist erfolgreich gestartet worden!!')
else
ShowMessage('MSExcel konnte nicht gestartet werden!!');
Excel.Visible := TRUE; // TRUE = Excel sichtbar.
Excel.Application.Workbooks.Open(filename:='c:\test.xls'); // Neue Arbeitsmappe öffnen in EXECL
//Excel.Application.Workbooks.Add;
Excel.Worksheets ['Tabelle1'].Activate;
zahl:= '0000123789';
Excel.cells[2,2].select; // Zelle wählen
Excel.Selection.numberFormat:= '@'; // benutzerdefiniertes Zahlenformat zuweisen
Excel.Cells[2,2]:= zahl; // String in die Zelle schreiben.
Excel.Workbooks.Close; // Mappe wieder schliessen.
Excel.Quit; // Excel schließen
end;
Das funktioniert ja auch ganz gut. Aber ich will Excel so benden, dass Änderungen automatisch
gespeichert werden. Und dann eventuell auch noch unter einem bestimmten Filenamen. Doch beides
funktioniert nicht so, wie ich das gerne will.
Weder
Excel.Workbooks.Close (savechanges:=true);
noch....
Excel.Workbooks.Close (savechanges:=true, filename:='c:\test.xls');
Kann mir hier jemand bei den 2 Codezeilen helfen? Danke!