Excel Datei mit Delphi erstellen/ändern

Computer: Software & Programmierung Delphi & Pascal
1

Tag

Ich möchte einige Werte(Strings)in eien Excel Datei exportieren.

Mein bisheriger Ansatz hat mir da nicht viel Freude bereitet:

procedure TForm3.Button3Click(Sender: TObject);

var excel:Variant;
begin

try
Excel := CreateOleObject(‚Excel.Application‘);
except
ShowMessage(‚Excel konnte nicht gestartet werden !‘);
//Ende:=true;
end;
Excel.Workbooks.Add;
Excel.Cells[1, 1].Value:=‚Hallo Welt‘;

Label1.Caption:=Excel.Cells[1, 1].Value;
end;

Hat da jemand eine Lösung? Würde mich rieseig freuen :smile:

MfG Konstantin

2

Hi,

du hast leider nicht genau beschrieben was dir an deinem Ansatz nicht gefallen hat bzw. was nicht geklappt hat. Villeicht liegt es daran, dass du dein Ergebnis nicht anzeigst, also Excel nicht sichtbar machst. Das geht mit:
excel.visible := true;

procedure TForm1.Button1Click(Sender: TObject);
var excel:Variant;
begin

try
excel := CreateOleObject(‚Excel.Application‘);
excel.visible := true;
except
ShowMessage(‚Excel konnte nicht gestartet werden !‘);
end;

Excel.Workbooks.Add;
Excel.Cells[1, 1].Value:=‚Hallo Welt‘;
Label1.Caption:=Excel.Cells[1, 1].Value;

end;

Mfg
dinchen