Einzelnen Beitrag anzeigen

Benutzerbild von Delphi-Narr
Delphi-Narr

Registriert seit: 29. Aug 2009
Ort: Duisburg
437 Beiträge
 
Delphi 2007 Professional
 
#5

Re: Excel-Funktion im Hintergrund ablaufen lassen

  Alt 11. Dez 2009, 13:51
Also ich hab die Dateien schon von einer Bank (weiß nicht mehr genau welche).
Ich mach das auch gerne mit XML, doch wie lade ich eine XML-Datei in Delphi rein?

Edit:

Das mit den Makros interessiert mich jetzt schon... Also hier ist er:

Sub Makro1()
'
' Makro1 Makro
' Makro
'

'
ChDir "C:\Program Files\Borland\Delphi5\Projects\Währungsrechner\Dat afiles"
Workbooks.OpenXML Filename:= _
"C:\Program Files\Borland\Delphi5\Projects\Währungsrechner\Dat afiles\eurofxref-hist.xml" _
, LoadOption:=xlXmlLoadImportToList
Columns("A:B").Select
Selection.Delete Shift:=xlToLeft
ActiveWorkbook.SaveAs Filename:= _
"C:\Program Files\Borland\Delphi5\Projects\Währungsrechner\Dat afiles\Mappe2.txt" _
, FileFormat:=xlText, CreateBackup:=False
End Sub

Wie muss ich den jetzt in Delphi einbinden? Also ich habe bisher:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  Excel : Variant;
begin
  Excel := CreateOleObject('Excel.Application');
Ist jetzt ja nicht so ein Monsterquellcode, der würde doch bestimmt auch bei Excel 2003 funktionieren...
  Mit Zitat antworten Zitat