Zitat von
go4hl80ve:
hab gerade genau das selbe Problem
wenn ich diese variante versuche:
Zitat:
ActiveSheet.QueryTables.Add("TEXT;C:\Dokumente und Einstellungen\Stefan\Desktop\daten.csv", Range("A1"))
(und natürlich noch die " gegen ' austausche,) dann meckert Delphi 6 immer noch über das "Range"...
Ins Blaue:
Delphi-Quellcode:
var
rangeA1 : OleVariant;
...
rangeA1 := excel.ActiveSheet.Range('A1');
excel.ActiveSheet.QueryTables.Add('TEXT;C:\Dokumente und Einstellungen\Stefan\Desktop\daten.csv', range);
Bei der Automatisierung sollte man übrigen von Zwischenvariablen Gebrauch machen.
Statt also ständig excel.ActiveSheet.irgendwas zu schreiben:
Delphi-Quellcode:
var
mysheet:OleVariant;
....
mysheet := excel.ActiveSheet;
mysheet.irgendwasdummes;