Kapanıştan önce bir çalışma kitabını kaydetmek için bir Excel makrosu - kuklalar

Burada sunulan makro, kullanıcıları kaydetmeden önce dosyalarını yanlışlıkla kapatmalarını önlemenin mükemmel bir yoludur. Uygulandığında, bu makro, Excel'in çalışma kitabını kapatmadan önce otomatik olarak kaydetmesini sağlar.

Excel, normalde, kaydedilmemiş bir çalışma kitabını kapatmaya çalışan kullanıcıları kapanmadan önce kaydetme seçeneği sunarak uyarır. Ancak, birçok kullanıcı uyarıları sonlandırabilir ve Excel'e kaydetmeden kapanmasını söyleyerek Hayır'ı yanlışlıkla tıklatabilir. Bu makro ile kapanmadan önce otomatik olarak tasarruf ederek buna karşı koruma altındasınız.

Makronun çalışma şekli

Kod, çalışma kitabının BeforeClose olayı tarafından tetiklenir. Çalışma kitabını kapatmaya çalıştığınızda, içindeki olay kodunu çalıştıran bu olay tetiklenir. Kodun temel unsuru basittir; kullanıcılara çalışma kitabını kapatmak isteyip istemediğini sorar. Makro, daha sonra kullanıcının Tamam'ı mı yoksa İptal'i mi tıklattığını değerlendirir.

çalışma kitabını kapatmaya çalıştığınızda gördüğünüz mesaj.

Değerlendirme bir Select Case ifadesi ile yapılır. Select Case deyimi, makrolarınızda durum denetimleri gerçekleştirmenize izin veren If-Then-Else ifadesine bir alternatiftir. Select Case deyiminin temel yapısı basittir:

Select Case Case = Durum İs = Case Is = Son Seç

Select Case ifadesi ile birçok koşullu kontrol gerçekleştirebilirsiniz. Bu durumda, sadece Tamam veya İptal için kontrol ediyorsunuz. Koda bir göz atın:

Adım 1'de, ileti kutusunu Durum Seçimi ifadesinin durum denetimi olarak etkinleştirirsiniz. Tamam ve İptal düğmelerinin seçenekler olarak sunulmasını sağlamak için vbOKCancel bağımsız değişkenini kullanın.

2. Adımda, kullanıcı ileti kutusundaki İptal'i tıklattıysa, makro, Excel'e, İptal Boolean'ına True değerini geçirerek Workbook_Close olayını iptal etmesini söyler.

Kullanıcı ileti kutusundaki Tamam düğmesini tıklattıysa, 3. Adım etkili olur. Burada, Excel'e çalışma kitabını kaydetmesini söyledin. İptal Boolean'ını True olarak ayarlamadığınız için Excel, kapatmaya devam ediyor.

Adım 4'te, Select Case ifadesini kapatmanız yeterlidir. Bir Seçme Durumunu her başlattığınızda, ilgili bir Sonlandır seçimi ile kapatmalısınız.

Makro nasıl kullanılır

Bu makroyu uygulamak için, onu kopyalayıp Workbook_BeforeClose olay kodu penceresine yapıştırmanız gerekir. Makronun yerleştirilmesi, çalışma kitabını her kapatmaya çalıştığınızda çalışmasına izin verir:

Alt + F11 tuşlarına basarak Visual Basic Düzenleyicisi'ni etkinleştirin.

1. Proje penceresinde, proje / çalışma kitabı adınızı bulun ve tüm sayfaları görmek için yanındaki artı işaretini tıklayın.

2. ThisWorkbook'u tıklayın.

3. Olay açılır listesinden BeforeClose olayını seçin.

4. Kodu yeni oluşturulan modüle yazın veya yapıştırın.

5. Workbook BeforeClose olayına kodunu girin.