|
Hallo zusammen,
ich habe eine Tabelle, die ca 500 Daten lang ist und 35 Spalten beinhaltet.
Ich möchte die Spalte Filtern, indem ich nur die Zeilen habe, indem in der letzten Spalte "X" steht (z.b.), dazu brauche ich auch nicht alle Spalten, sondern nur A,B,C, D, AB, AI.
Jetzt war mein Gedanke, dass ich erst die komplette Tabelle in ein Array übergebe und dann mit der Funktion "Filter", ein neues Array nur mit den Werten befülle, indem die letzte Spalte mit "X" gefüllt ist. Danach wollte ich nur noch die benötigten Spalten in ein Tabellenblatt ausgeben.
Aber ich scheitere an der Funktion "Filter", bzw. habe ich diese oft mit evaluate gesehen, aber auch das funktioniert nicht.
Hier habe ich versucht, die Daten von der Tabelle direkt mit dem Filter in ein Array zu übergeben,
vardat = Evaluate("=FILTER(Application!A:AI;Application!AI:AI=""X"")")
oder erst die Funktion in der Tabelle arbeiten zulassen und dann das Array zu füllen
Tabelle1.Range("A1:A" & i) = Evaluate("=FILTER(Application!A:AI;Application!AI:AI=""x"")")
Ich habe keine Ahnung wie ich das umsetzen könnte.
Ich lasse mich gern belehren, wie es gemacht wird. Vielen Dank
|