KTF Düşeyara Tüm Sayfalarda

Bu dosya, aranan değeri tek bir sayfada değil çalışma kitabındaki tüm sayfalarda arayan SayfalardaAra adlı özel fonksiyonu içerir. Fonksiyon, VLOOKUP (DÜŞEYARA) mantığıyla çalışır ve değeri bulduğu ilk sayfadaki karşılığı döndürür.

Dosya makro içerir (.xlsm); açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• exceldestek.com | exceldepo.com: D3:D8 aralığında 101-107 arası kodlar listelenir. Sayfada "Bütün Sayfalarda Arar." notu yer alır.
• exceldestek: B2:B3 aralığında 100 ve 104 kodları bulunur.
• exceldepo: B2:B3 aralığında 101 ve 103 kodları bulunur.
• excel: B2:B4 aralığında 102, 105 ve 106 kodları bulunur.

Kodlar farklı sayfalara dağıtıldığı için fonksiyonun aramayı sayfalar arasında sürdürmesi örnek veriler üzerinde denenebilir.

Makrolar​

• SayfalardaAra (Module1): Parametreleri Aranan, Veri (arama aralığı), Sutun (döndürülecek sütun numarası) ve isteğe bağlı Kriter (tam ya da yaklaşık eşleşme) şeklindedir. Fonksiyon çalışma kitabındaki sayfaları sırayla gezer, her sayfada verilen aralığın aynı adresini alır ve WorksheetFunction.VLookup ile arama yapar. Sonuç boş değilse döngü durur ve bulunan değer döndürülür. Hatalar On Error Resume Next ile yok sayılır, bu nedenle bulunamayan değer için hata yerine boş sonuç gelir.

Fonksiyon bir düğmeyle değil, hücreye formül olarak yazılarak çalıştırılır. Kodda dosya silme ya da dış bağlantı gibi işlem bulunmaz.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sonucun görüneceği hücreye SayfalardaAra fonksiyonunu yazın; sırasıyla aranan değeri, arama aralığını ve sütun numarasını girin.
3. Arama aralığı, tüm sayfalarda aynı adreste bulunan veri bölgesini göstermelidir.
4. Kendi verinizde kullanmak için Module1 içindeki fonksiyon, VBA düzenleyicisinden kendi dosyanıza aktarılır ve dosya .xlsm olarak kaydedilir.

Dosyada tanımlı Veri1 ve Veri2 adları #REF! değerine bağlıdır; kullanmadan önce kendi aralığınıza göre yeniden tanımlanmalıdır.