Zugriff auf EXCEL-Daten

[Michael Booms]

Hallo an alle die dies lesen,

ich möchte mit DELPHI5-Profrssiona,l Daten aus einer EXCEL-Datei lesen und auch in die Datei Daten schreiben bzw.
anhängen.
All meine bisherigen Versuche sind gescheitert.
Kann mir jemand helfen wie das geht?

Besten Dank - Michael Booms

[Falk Prüfer]

Hallo Michael,

z.B.<br>
var<br>
AppExcel:Variant;<br>
FWS, FWB, FWC: Variant;<br>
begin<br>
AppExcel := CreateOleObject('Excel.Application');{Excel öffnen}<br>
FWB := AppExcel.Workbooks.Add(xlWBATWorksheet);{Neue Arbeitsmappe anlegen}<br>
FWS := FWB.WorkSheets.Item[1];{Zugriff auf erstes Tabellenblatt}<br>
FWC := FWS.Cells[Zeile, Spalte];{Zugriff auf beliebige Zelle}<br>
FWC.Value := Irgendwas;{Wert der Zelle setzen}<br>
FWB.Close(True);{Arbeitsmappe schließen und nach Speicherung fragen}<br>
AppExcel.Quit;{Excel beenden}<br>
<br>
Du kannst die Bezüge natürlich auch direkt herstellen (ohne die Zwischenvariablen) also z.B. FWB.WorkSheets.Item[1].Cells[Zeile, Spalte].Value := Irgendwas.

Mit AppExcel.Visible kannst Du noch festlegen, ob Excel sichtbar sein soll oder der ganze Vorgang für den Anwender transparent im Hintergrund abläuft.

Gruß Fal