So verwenden sie xlookup in vba (mit beispielen)
Sie können die folgende grundlegende Syntax verwenden, um einen XLOOKUP mit VBA durchzuführen:
Sub Xlookup()
Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "))
End Sub
Dieses spezielle Beispiel sucht nach dem Wert in Zelle E2 im Bereich A2:A11 , findet den passenden Wert im Bereich C2:C11 und weist das Ergebnis dann der Zelle F2 zu.
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: Verwendung von XLOOKUP in VBA
Nehmen wir an, wir haben den folgenden Datensatz in Excel, der Informationen über verschiedene Basketballspieler enthält:
Nehmen wir an, wir möchten den Datensatz nach dem Teamnamen „Kings“ durchsuchen und den entsprechenden Wert in der Assists-Spalte zurückgeben.
Dazu können wir das folgende Makro erstellen:
Sub Xlookup()
Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "))
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Das Makro gibt korrekterweise einen Wert von 3 Assists für die Kings zurück.
Wenn wir den Teamnamen in Zelle E2 ändern und dann das Makro erneut ausführen, wird der Hilfswert für den neuen Teamnamen korrekt gefunden.
Nehmen wir zum Beispiel an, wir ändern den Teamnamen in „Warriors“ und führen das Makro erneut aus:
Das Makro gibt korrekt einen Wert von 4 Assists für die Warriors zurück.
Beachten Sie, dass Sie der Xlookup- Funktion auch ein optionales viertes Argument hinzufügen können, um den Wert anzugeben, der angezeigt werden soll, wenn keine Übereinstimmung gefunden wird.
Sie können beispielsweise das folgende Makro verwenden, um eine XLOOKUP-Funktion auszuführen und „Keine“ zurückzugeben, wenn keine Übereinstimmung gefunden wird:
Sub Xlookup()
Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "), "None")
End Sub
Sie können „Keine“ jederzeit durch den Wert ersetzen, den Sie anzeigen möchten.
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
VBA: So verwenden Sie den Indexabgleich
VBA: So verwenden Sie VLOOKUP
VBA: So verwenden Sie SVERWEIS von einem anderen Blatt aus