Sayfanıza Arama Motoru Ekleme

Bu dosya, Excel sayfasına bir arama kutusu eklemeyi gösteren makro destekli bir şablondur. Kutuya yazılan kelime, listedeki faaliyet tanımlarında anında aranır ve yalnızca eşleşen satırlar ekranda kalır.

Dosyanın içeriği​

Dosyada tek bir sayfa bulunur ve veriler A1:C450 aralığındadır.

• A sütunu: "FAALİYET TANIMI" başlığı altında faaliyet açıklamaları (ör. adi metalden büro malzemeleri imalatı, ağ ve ağ ürünleri imalatı).
• C sütunu: "KODU" başlığı altında her faaliyete ait kod (ör. 25.99.04, 25.92.02).
• Sayfanın üst kısmında "Arama" etiketiyle birlikte arama kutusu (TextBox) yer alır. Başlık satırı 4. satırdadır ve filtre bu satırdan başlar.

Dosyada hücre formülü kullanılmamıştır; arama tamamen makro ile çalışır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makro, sayfa modülünde yer alan TextBox1_Change yordamından oluşur.

• TextBox1_Change: Arama kutusundaki metin her değiştiğinde otomatik çalışır. 4. satırdaki başlıktan başlayan listeye, ilk sütun (FAALİYET TANIMI) için AutoFilter uygular. Ölçüt, yazılan kelimenin başına ve sonuna joker karakter (*) eklenerek oluşturulur; böylece kelime, açıklamanın herhangi bir yerinde geçse eşleşme sağlanır.
• Makro ayrıca çalıştırılmaz; kutuya yazıldığı anda devreye girer. Kutu boşaltıldığında tüm liste yeniden görüntülenir.
• Kodda dosya silme, dışarıya bağlantı gibi zararlı bir işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve uyarı çıktığında makroları etkinleştirin.
2. Sayfanın üstündeki arama kutusuna aranacak kelimeyi veya kelimenin bir bölümünü yazın.
3. Liste, yazdıkça yalnızca bu ifadeyi içeren faaliyet tanımlarına daralır; ilgili kod C sütunundan okunur.
4. Tüm listeyi yeniden görmek için kutudaki yazıyı silin.
5. Kendi verinizle kullanmak için başlığı 4. satıra, verileri altına yerleştirin; makro ilk sütunda arama yapar.