Excele Arama Butonu Ekleme

Bu dosya, Excel'in çalışma sayfası menü çubuğuna "BUL" adlı bir arama kutusu ekler. Kutuya bir ifade yazıp Enter'a bastığınızda Excel'in Bul iletişim penceresi bu ifadeyle açılır. Kendi çalışma dosyalarınıza arama kutusu eklemek isteyenler için örnek bir uygulamadır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: Boş bir sayfadır, içinde veri ya da formül yoktur. Dosyanın asıl işlevi makrolardadır.
• ThisWorkbook: Dosya açıldığında çalışan Workbook_Open olayını içerir.
• Module1: Arama penceresini açan Bulmaca işlevini içerir.

Makrolar​

• Workbook_Open: Dosya açıldığında çalışır. Çalışma sayfası menü çubuğunda (Worksheet Menu Bar) daha önce eklenmiş "BUL" adlı bir öğe varsa önce onu siler, böylece aynı kutu tekrar tekrar oluşmaz. Ardından menü çubuğuna "BUL" başlıklı bir metin kutusu ekler ve bu kutuya Bulmaca makrosunu bağlar.
• Bulmaca: BUL kutusuna yazdığınız metni alır ve Excel'in Formül Bul (Bul ve Değiştir) iletişim penceresini bu metin hazır olarak açar.

Makro kodunda dosya silme, dışarıya bağlantı kurma gibi zararlı bir işlem yoktur. Silme komutu yalnızca menüye eklenen BUL kutusu için kullanılır.

Nasıl kullanılır​

1. Dosyayı açın ve uyarı çıktığında makroları etkinleştirin.
2. Excel'in menü çubuğunda "BUL" başlıklı kutuyu bulun.
3. Aramak istediğiniz ifadeyi kutuya yazın ve Enter'a basın.
4. Açılan Bul penceresinde sonuçlara göz atın.
5. Kendi dosyanızda kullanmak için ThisWorkbook ve Module1 içindeki kodu kendi projenize taşıyın.

Not: Menü çubuğuna eklenen kutu, Excel'in eski sürümlerindeki menü yapısına göre hazırlanmıştır. Yeni sürümlerde şerit arayüzü nedeniyle kutu görünmeyebilir veya farklı bir yerde yer alabilir.

Faydalı olması temennisiyle.