Jak korzystać z funkcji wyszukaj.pionowo w vba (z przykładami)

Aby wykonać WYSZUKAJ.PIONOWO przy użyciu VBA, możesz użyć następującej podstawowej składni:

 Sub Vlookup()
   Range(" F2 ").Value = WorksheetFunction.Vlookup(Range(" E2 "), Range(" A2:C11 "),3,False)
End Sub

Ten konkretny przykład szuka wartości w komórce E2 w zakresie A2:C11 i znajduje pasującą wartość w trzeciej kolumnie zakresu, a następnie przypisuje wynik do komórki F2 .

Uwaga : Ostatni argument False określa, że chcemy dokładnego dopasowania.

Poniższy przykład pokazuje, jak zastosować tę składnię w praktyce.

Przykład: Jak używać WYSZUKAJ.PIONOWO w VBA

Załóżmy, że mamy w programie Excel następujący zbiór danych zawierający informacje o różnych koszykarzach:

Załóżmy, że chcemy przeszukać zbiór danych pod kątem nazwy zespołu „Kings” i zwrócić odpowiednią wartość w kolumnie asyst.

W tym celu możemy utworzyć następujące makro:

 Sub Vlookup()
   Range(" F2 ").Value = WorksheetFunction.Vlookup(Range(" E2 "), Range(" A2:C11 "),3,False)
End Sub

Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:

Makro poprawnie zwraca wartość 3 asyst dla królów.

Jeśli zmienimy nazwę zespołu w komórce E2 , a następnie ponownie uruchomimy makro, poprawnie znajdzie ono wartość pomocniczą dla nowej nazwy zespołu.

Załóżmy na przykład, że zmieniamy nazwę drużyny na „Warriors” i ponownie uruchamiamy makro:

Makro poprawnie zwraca wartość 4 asyst dla Wojowników.

Uwaga : Pełną dokumentację metody VBA VLookup można znaleźć tutaj .

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w VBA:

VBA: Jak korzystać z dopasowywania indeksów
VBA: Jak sortować arkusz według wielu kolumn
VBA: jak sprawdzić, czy ciąg zawiera inny ciąg