Cara menggunakan xlookup di vba (dengan contoh)

Anda dapat menggunakan sintaks dasar berikut untuk melakukan XLOOKUP menggunakan VBA:

 Sub Xlookup()
    Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "))
End Sub

Contoh khusus ini mencari nilai dalam sel E2 dalam rentang A2:A11 dan menemukan nilai yang cocok dalam rentang C2:C11 , lalu menetapkan hasilnya ke sel F2 .

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara menggunakan XLOOKUP di VBA

Katakanlah kita memiliki kumpulan data berikut di Excel yang berisi informasi tentang berbagai pemain bola basket:

Katakanlah kita ingin mencari kumpulan data untuk nama tim “Raja” dan mengembalikan nilai yang sesuai di kolom bantuan.

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub Xlookup()
    Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "))
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Makro dengan benar mengembalikan nilai 3 assist untuk Raja.

Jika kita mengubah nama tim di sel E2 dan kemudian menjalankan makro lagi, nilai pembantu untuk nama tim baru akan ditemukan dengan benar.

Misalnya, kita mengubah nama tim menjadi “Warriors” dan menjalankan makro lagi:

Makro dengan benar mengembalikan nilai 4 assist untuk Warriors.

Perhatikan bahwa Anda juga dapat menambahkan argumen opsional keempat ke fungsi Xlookup untuk menentukan nilai yang harus ditampilkan jika tidak ditemukan kecocokan.

Misalnya, Anda bisa menggunakan makro berikut untuk menjalankan fungsi XLOOKUP dan mengembalikan “Tidak Ada” jika tidak ditemukan kecocokan:

 Sub Xlookup()
    Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "), "None")
End Sub

Jangan ragu untuk mengganti “Tidak Ada” dengan nilai apa pun yang ingin Anda tampilkan.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menggunakan pencocokan indeks
VBA: cara menggunakan VLOOKUP
VBA: Cara menggunakan VLOOKUP dari sheet lain