AW: Filter in Array einstellig
18.06.2020 22:08:04
GerdL
Moin Marion,
die angestaubte (VBA-)Filter-Funktion sucht mit den Defaultargumenten einen String als Teilzeichenfolge in den Werten der Sourcearray. So kommt dein Ergebnis zustande.
Wie du das gewollte Ergebnis (einstellige Zahlen) weiterverwenden möchtest, ist nicht klar.
Kommen die einstellige Zahlen im Array nur einmal vor, könntest du so ersatzweise so vorgehen.
(Zur Verdeutlichung habe ich nicht den ersten Wert als Suchwert genommen.)
Sub UNIT()
Dim Position As Long
Position = Application.Match(10, Array(1, 2, 3, 6, 10, 11), 0)
MsgBox Position & " te"
MsgBox Array(1, 2, 3, 5, 10, 11)(Position - 1)
End Sub
Die Array-Funktion ist Null-basiert, d.h. die erste Postion des ersten Wertes der Auflistung
ist 0. Deshalb bei dem Auslesen des Wertes
Position -1
Lupo bringt die Excel-Formel-Funktion FILTER ins Spiel, die meine Excelversion leider nicht kennt.
Gruß Gerd