Vba'da hlookup nasıl kullanılır (örneklerle)

VBA’yı kullanarak HL araması gerçekleştirmek için aşağıdaki temel sözdizimini kullanabilirsiniz:

 Sub Hlookup()
    Range(" H2 ").Value = WorksheetFunction.HLookup(Range(" G2 "),Range(" A1:E2 "),2,False)
End Sub

Bu özel örnek, A1:E2 sütunlarında G2 hücresinin değerini arar ve söz konusu sütunun ikinci satırında bulunan değeri bulur, ardından sonucu H2 hücresine atar.

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

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

Örnek: VBA’da YATAYARA 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 “Mavs” takım adını aramak ve puan satırında karşılık gelen değeri döndürmek istiyoruz.

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

 Sub Hlookup()
    Range(" H2 ").Value = WorksheetFunction.HLookup(Range(" G2 "),Range(" A1:E2 "),2,False)
End Sub

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

Makro, Mavs için doğru şekilde 22 puanlık bir değer döndürür.

G2 hücresindeki takım adını değiştirip makroyu tekrar çalıştırırsak, yeni takım adı için puan değerini doğru bir şekilde bulacaktır.

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

Makro, Rockets için doğru bir şekilde 34 puanlık bir değer döndürüyor.

Not : VBA HLookup 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: DÜŞEYARA nasıl kullanılır
VBA: XLOOKUP nasıl kullanılır?