Bu dosya, Excel çalışma kitabı açıldığında ve kapatıldığında kendiliğinden uyarı penceresi gösteren makroların nasıl yazıldığını örnekler. Açılışta Auto_open, kapanışta Auto_close adlı prosedürler çalışır.
Dosya makro içerir (.xlsm); açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir (.xlsm); açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sheet1: Yalnızca D2 hücresinde bir metin bulunan, formül içermeyen örnek sayfa.
- ThisWorkbook ve Sheet1 kod bölümleri: Her ikisinde de Auto_open ve Auto_close prosedürleri yer alır. Bu prosedürlerde uyarı metni olarak dosyayı hazırlayan kişiye ait bir bilgi ve bir iletişim telefonu verilmiştir.
- Module1: Kullanıcı adını kullanan Auto_open ve Auto_close prosedürleri bulunur.
Makrolar
- Auto_open: Önce Beep ile sesli uyarı verir, ardından MsgBox ile bilgi penceresi açar. Module1 sürümünde pencere, Application.UserName değerini WorksheetFunction.Proper ile baş harfleri büyütülmüş biçimde gösterir ve aynı ad pencere başlığında da yer alır.
- Auto_close: Yine Beep ve MsgBox ile kapanış uyarısı gösterir, ardından ActiveWorkbook.Save ile dosyayı kaydeder. ThisWorkbook ve Sheet1 sürümündeki pencere vbSystemModal ile açılır, yani diğer pencerelerin üzerinde durur.
- Kodda dosya silme ya da dışarıya bağlantı kuran bir işlem yoktur.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin; açılış uyarısı ekranda görünür.
- Pencereyi Tamam ile kapatın ve çalışmanıza devam edin.
- Dosyayı kapattığınızda kapanış uyarısı çıkar; pencere onaylandıktan sonra dosya otomatik kaydedilir.
- Kendi dosyanızda kullanmak için Alt+F11 ile VBA düzenleyicisini açın, MsgBox metinlerini ihtiyacınıza göre değiştirin ve dosyayı .xlsm olarak kaydedin.