Versuchs mal so:
is von hier aus der Code-Library:
http://www.delphipraxis.net/internal...ighlight=excel
Delphi-Quellcode:
procedure Excelauf;
var
row, column: Integer;
begin
Excel := CreateOleObject('
Excel.Application');
//Hier kommt der weitere Code hin
excel.Application.SheetsInNewWorkBook := 1;
//Die 8 is die Anzahl der Sheets
Excel.Workbooks.Add;
Excel.Sheets[1].
Name := '
DP Sheet';
//Hierbei ist 1 das erste Sheet 2 das zweite usw.
//von nun an können wir unser Sheet auch über den gegebenen Namen ansprechen! zB:
Excel.Sheets['
DP Sheet'];
row := 1;
column := 2;
Excel.Sheets['
DP Sheet'].Cells[row,column].Value := '
Hallo';
Excel.Sheets['
DP Sheet'].Cells[1,3].value := 5.23;
//Da Value vom Typ Variant is können wir hier fast alles reinschreiben
Excel.Visible := true;
end;
Kannste zwwar nich sehen, was du änderst, aber das funktioniert, kannst das gesamte Dokument damit bearbeiten
Bei mir hat das Tut gefunzt
