Açılış ve Kapanışlarda Not Ekleme

Bu şablon, çalışma kitabı açıldığında ve kapatıldığında ekrana not (mesaj kutusu) getiren makrolar içerir. Kapanışta dosya otomatik olarak kaydedilir. Aynı yapı kendi dosyalarınıza uyarı veya bilgi notu eklemek için örnek olarak kullanılabilir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosya .xlsm biçimindedir.

Dosyanın içeriği​

• Sayfa1: D2:F17 aralığında kullanılan alan bulunur; formül ve veri doğrulama yoktur.
• VBA tarafında ThisWorkbook, Sayfa1 ve Module1 bölümlerinde aynı adlı iki makro tanımlıdır.

Makrolar​

• Auto_open: Dosya açılırken bip sesi çıkarır ve bilgi simgeli bir mesaj kutusu gösterir. Kutunun başlığında, emeklerin kaybolmaması için kaydetmeyi unutmama uyarısı yer alır.
• Auto_close: Dosya kapatılırken bip sesi çıkarır, hata bildirimine yönelik iletişim notunu gösterir ve ardından ActiveWorkbook.Save ile çalışma kitabını kaydeder.

ThisWorkbook ve Sayfa1 içindeki mesajlarda hata bildirimi için bir telefon numarası yazılıdır. Module1 içindeki sürümde ise hata bildirimi için exceldepo.com adresi belirtilir ve kapanış kutusu kritik hata simgesiyle açılır. Kodda dosya silme veya dışarıya bağlantı kuran bir komut yoktur; mesajlardaki adres yalnızca metindir.
Not: Aynı adlı makrolar birden fazla bölümde tanımlı olduğundan, açılış ve kapanış mesajlarının hangisinin çalışacağı Excel sürümüne ve kodun yerleşimine göre değişebilir. Kendi notunuzu kullanmak için üç bölümdeki metinleri aynı şekilde düzenlemeniz önerilir.

Nasıl kullanılır​

1. Dosyayı indirin ve açın; güvenlik uyarısında makroları etkinleştirin.
2. Açılışta görünen mesaj kutusunu Tamam ile kapatın.
3. Mesaj metinlerini değiştirmek için Alt+F11 ile VBA düzenleyicisini açın, ThisWorkbook ve Module1 içindeki MsgBox metinlerini kendi notunuzla değiştirin.
4. Sayfa1 üzerindeki D2:F17 alanını kendi içeriğinize göre kullanın.
5. Dosyayı kapattığınızda mesaj gösterilir ve değişiklikler otomatik kaydedilir.