Vba'da düşeyara nasıl kullanılır (örneklerle)

VBA kullanarak DÜŞEYARA gerçekleştirmek için aşağıdaki temel sözdizimini kullanabilirsiniz:

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

Bu özel örnek, A2:C11 aralığındaki E2 hücresindeki değeri arar ve aralığın üçüncü sütununda eşleşen değeri bulur, ardından sonucu F2 hücresine atar.

Not : False’ın son argümanı tam bir eşleşme istediğimizi belirtir.

Aşağıdaki örnek, bu sözdiziminin pratikte nasıl kullanılacağını gösterir.

Örnek: VBA’da DÜŞEYARA nasıl kullanılır?

Diyelim ki Excel’de çeşitli basketbol oyuncuları hakkında bilgiler içeren aşağıdaki veri kümesine sahibiz:

Diyelim ki veri kümesinde “Kings” takım adını aramak ve asist sütununda karşılık gelen değeri döndürmek istiyoruz.

Bunun için aşağıdaki makroyu oluşturabiliriz:

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

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Makro, Krallar için doğru bir şekilde 3 asist değerini döndürüyor.

E2 hücresindeki takım adını değiştirip makroyu tekrar çalıştırırsak, yeni takım adı için yardımcı değeri doğru şekilde bulacaktır.

Örneğin takım adını “Savaşçılar” olarak değiştirdiğimizi ve makroyu tekrar çalıştırdığımızı varsayalım:

Makro, Warriors için doğru bir şekilde 4 asist değerini döndürüyor.

Not : VBA VLookup yöntemine ilişkin tüm belgeleri burada bulabilirsiniz.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Dizin eşleştirme nasıl kullanılır?
VBA: Bir sayfayı birden çok sütuna göre sıralama
VBA: bir dizenin başka bir dize içerip içermediği nasıl kontrol edilir