Bu dosya, çalışma kitabı kapatılırken kullanıcıya otomatik olarak bir mesaj kutusu gösteren makro örneğidir. Kapatma mesajı vermek isteyenler için kodu ve çalışma yapısını tek bir sayfada sunar.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosya .xlsm biçimindedir.
Bu fonksiyon Excel'in yerleşik fonksiyonu değil, modüldeki FileName işlevidir. Sonuç olarak açık olan çalışma kitabının adı (uzantısıyla birlikte) hücreye yazılır.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosya .xlsm biçimindedir.
Dosyanın içeriği
- Sheet1: F2 hücresinde "Resme Tıklat" yazısı bulunur. F10 hücresinde ise dosyanın adı formülle gösterilir.
- Module1: İki prosedür içeren VBA modülüdür: auto_close ve FileName.
Kullanılan formüller
F10 hücresinde, dosyanın adını veren özel fonksiyon çağrılır:=FileName()
Makrolar
- auto_close: Çalışma kitabı kapatılırken otomatik olarak çalışır. Ekranda MsgBox ile bir veda mesajı gösterilir; mesajda ExcelDepo'ya eklenen dosyaları incelemeye yönelik bir hatırlatma yer alır. Elle çalıştırmak gerekmez.
- FileName: ThisWorkbook.Name değerini döndüren işlevdir. F10 hücresindeki formül bu işlevi kullanır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Sheet1 sayfasında F10 hücresinde dosya adının göründüğünü kontrol edin.
- Dosyayı kapatın; kapanırken mesaj kutusu görüntülenir.
- Kendi dosyanızda kullanmak için Alt+F11 ile VBA düzenleyicisini açın, auto_close prosedürünü kendi çalışma kitabınızdaki bir modüle kopyalayın ve MsgBox içindeki metni değiştirin.
- Dosyayı makro içerebilen biçimde (.xlsm) kaydedin.