Bu makalede, Microsoft Excel 2010'da VBA kullanarak çalışma kitabını kapatmayı öğreneceğiz.
VBA makronuz/kodunuz gerekli tüm eylemleri gerçekleştirdikten sonra, makronun dosyayı kaydetmesini veya kaydetmeyi atlamasını istersiniz. İşte, dosyayı kapatmasını isterken kodda ayarlayabileceğiniz seçenekler. VBA'daki Kapat ve Aç yöntemi, çalışma kitaplarını kapatmak ve açmak için kullanılabilir.
Kodun değişiklikleri kaydetmeden dosyayı kapatmasını istiyorsanız - bu satırı kodunuzun sonunda veya gereken her yerde kullanın -
ActiveWorkbook.Close (Yanlış) veya ActiveWorkbook.Close False veya ActiveWorkbook.CloseSaveChanges:=YANLIŞ
Aşağıdaki resimdeki koda bakın. Kodu kopyalamak için klavyede Alt + F11 tuşlarına basarak excel sayfasının açık olduğundan emin olun. Ardından Microsoft Excel Nesneleri'ne sağ tıklayın ve Ekle'yi seçin. Ardından Modül'e tıklayın. Resmin altında verilen kodu kopyalayın -
Seçenek Açık
Alt makro1()
ActiveWorkbook.Close False
Alt Bitiş
Not: ActiveWorkbook metnini, kodunuza göre çalışma kitabını veya çalışma kitabını tanımlamak için kullandığınız değişkenin adına atıfta bulunacak şekilde değiştirebilirsiniz.
Dosyayı kapatırken kodun değişiklikleri kaydetmesini istiyorsanız,
ActiveWorkbook.Close (Doğru) veya ActiveWorkbook.Close True veya ActiveWorkbook.Close SaveChanges:=TRUE
İşte kod -
Seçenek Açık
Alt makro1()
ActiveWorkbook.Close True
Alt Bitiş
Ancak, kullanıcının karar vermesini istiyorsanız, sadece girmeniz yeterlidir.
ActiveWorkbook.Kapat
İşte kod -
Seçenek Açık
Alt makro1()
ActiveWorkbook.Kapat
Alt Bitiş
Kullanıcı, çalışma kitabını kaydetmek isteyip istemediğini soran bir açılır pencere alacaktır.
Workbooks("File1.XLS").Close SaveChanges:=False
Bu örnek, File1.xls'i kapatacak ve üzerinde yapılan değişiklikleri atacaktır.
Çözüm:
“Application.DisplayAlerts” False olarak ayarlandıysa, herhangi bir açılır pencere görmezsiniz ve çalışma kitabı kaydetmeniz istenmeden doğrudan kapanır.
Bu açılır pencere, "Application.DisplayAlerts", excel vba Activeworkbook.Close kod satırından önce herhangi bir yerde False olarak ayarlanmadıysa görünecektir.
Bu nedenle, kod uyarıları kapatmanızı gerektirse bile, Activeworkbook.Close satırından önce “Application.DisplayAlerts = True” öğesinin bulunduğundan emin olun.
Bloglarımızı beğendiyseniz, Facebook'ta arkadaşlarınızla paylaşın. Ayrıca bizi Twitter ve Facebook'ta da takip edebilirsiniz.
Sizden haber almayı çok isteriz, işimizi nasıl iyileştirebileceğimizi, tamamlayabileceğimizi veya yenileyebileceğimizi ve sizin için daha iyi hale getirebileceğimizi bize bildirin. bize yazıne-posta sitesi