Aktif hale getirdiğim bir dosyayı kapatınca çıkan kaydet farklı kaydet uyarısı hk.

Katılım
12 Şubat 2019
Mesajlar
115
Excel Vers. ve Dili
Vera. 10 Dil Türkçe
Merhaba,

vba da bir dosyayı kapatmak isdeğim zaman makro duruyor ve kaydet, farklı kaydet, geri pop-up uyarısı çıkıyor.
Bu uyarıyı yok sayarak makronun devamını gerçekleştirmek için yardımlarınızı rica ederim.

Workbooks("Satıs_iadeleri.xlsx").Activate
ActiveWorkbook.Close
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,520
Excel Vers. ve Dili
Office 365 Türkçe
Merhaba ,

kaydedip kapanmasını istiyorsanız aşağıdaki gibi deneyiniz.
Kod:
ActiveWorkbook.Close True
kaydetmeden kapanmasını istiyorsanız aşağıdaki gibi deneyiniz.
Kod:
ActiveWorkbook.Close False
 
Katılım
12 Şubat 2019
Mesajlar
115
Excel Vers. ve Dili
Vera. 10 Dil Türkçe
Merhaba ,

kaydedip kapanmasını istiyorsanız aşağıdaki gibi deneyiniz.
Kod:
ActiveWorkbook.Close True
kaydetmeden kapanmasını istiyorsanız aşağıdaki gibi deneyiniz.
Kod:
ActiveWorkbook.Close False
teşekkür ederim.
Sizden bir konu hakkında daha yardım rica edebilir miyim?
aşağıdaki kodda da uyarı çıkıyor. o uyarıyı yok etmek için ne yapmam gerek?

Workbooks("Şube_işlemleri.xlsx").Sheets("Sheet1").Delete
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,520
Excel Vers. ve Dili
Office 365 Türkçe
Merhaba rica ederim.

Diğer sorunuz içinde aşağıdaki gibi deneyiniz. Application.DisplayAlerts = False ile uyarı mesajlarını kapatıp True ile de açabiliyoruz
Kod:
Application.DisplayAlerts = False
Workbooks("Şube_işlemleri.xlsx").Sheets("Sheet1").Delete
Application.DisplayAlerts = True
 
Katılım
12 Şubat 2019
Mesajlar
115
Excel Vers. ve Dili
Vera. 10 Dil Türkçe
Merhaba rica ederim.

Diğer sorunuz içinde aşağıdaki gibi deneyiniz. Application.DisplayAlerts = False ile uyarı mesajlarını kapatıp True ile de açabiliyoruz
Kod:
Application.DisplayAlerts = False
Workbooks("Şube_işlemleri.xlsx").Sheets("Sheet1").Delete
Application.DisplayAlerts = True
Teşekkür ederim.
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,520
Excel Vers. ve Dili
Office 365 Türkçe
Rica ederim, iyi çalismalar.
 
Üst