Hallo zusammen,
ich versuche zur Zeit verzweifelt eine per OLE verbundene Excel-Tabelle nach Duplikaten zu filtern.
In VBA funktioniert der folgende Befehl:
Quelltext
1:
| Worksheets("Tabelle").Range("$A$1:$B$100").RemoveDuplcates(Columns := Array(1, 2), Header := 1) |
In Delphi verbinde ich mich per OLE mit Excel und anschließend mit der Arbeitsmappe sowie der Tabelle:
Delphi-Quelltext
1: 2: 3: 4:
| XL := GetActiveOleObject('Excel.Application'); WB := XL.Workbooks['Mappe1.xlsx']; WS := WB.Worksheets['Tabelle1']; WS.Range['$A$1:$B$100'].RemoveDuplicates(Columns := [color=red]?????[/color], Header := 1); |
Mein Problem ist jetzt die Übergabe des Array
[color=red]?????[/color]. Ich habe bereits mit der Array-Funktion "VarArrayCreate" experimentiert; nur leider ohne Erfolg.
Wenn ich nur nach einer Spalte reduzieren möchte, so funktioniert es. Dann kann man statt des Arrays einfach die Spaltennummer angeben.
Hat jemand von Euch eine Idee oder - noch besser - eine Lösung?
Gruß
Thomas
Moderiert von Narses: I- durch Delphi-Tags ersetzt