Arrayformel in Makro ausführen
30.01.2020 21:59:53
christian
Ich habe eine Datenbank angelegt und möchte nun über ein Makro bestimmte Werte aus der Datenbank abrufen.
einzelne Werte kann ich über SVerweis problemlos abrufen.
If Range("C1").Value = "MDA" Then Range("C17").FormulaLocal = "=SVERWEIS(C3;mda!F:H;3;FALSCH)"
Nun möchte ich, wenn mehrere Einträge zu einem bestimmten Suchergebnisse existieren, dass diese auch alle ausgegeben werden.
mit dieser Formel klappt das auch super:
=WENNFEHLER(INDEX(mda!$G$2:$G$99999;KGRÖSSTE((mda!$F$2:$F$99999=Abfrage_Erweitert!$C$3) *(ZEILE($F$2:$F$99999)-1);ZÄHLENWENN(mda!$F$2:$FA$99999;Abfrage_Erweitert!$C$3)+1-ZEILE(F1)));"")
Wenn ich dies nun aber in mein Makro einbaue bekomme ich einen Laufzeitfehler 428.
im Makro sieht das im Moment so aus:
If Range("C1").Value = "MDA" Then Range("B17").Selection.FormulaArray = _
"=WENNFEHLER(INDEX(mda!$G$2:$G$6000;KGRÖSSTE((mda!$F$2:$F$6000=Abfrage_Erweitert!$C$3)*(ZEILE($F$2:$F$6000)-1);ZÄHLENWENN(mda!$F$2:$FA$6000;Abfrage_Erweitert!$C$3)+1-ZEILE(F1)));"")"
Wie bekomme ich das Makro ohne Fehler zum laufen?