Kaydetmeden çıkma

[merakli_72]

mrb,
Bir excel kitabında yapılan değişiklikler kaydedilmeden excelden nasıl çıkılabilir

Application.DisplayAlerts = False
ThisWorkbook.Close False
Application.DisplayAlerts = True

yaptığınızda çalışma kitabı kapanıyor fakat arkada excel açık kalıyor onunda kapanması lazım

Application.Quit dediğinizde değişiklikleri kaydedeyimmi diye soruyor illa
basit bir konu gibi görünüyor ama birşey bulamadım
yardımcı olurmusunuz,

 

[security]

bunu deneyiniz.. kolay gelsin...
örnek dosyada ekliyorum...

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Run "security"
End Sub

Sub security()
ActiveWorkbook.Saved = True
Application.Quit
End Sub

 

[merakli_72]

çok teşekkür ederim,
fakat şu kısmı anlamadım

ActiveWorkbook.Saved = True

aktiv çalışma kitabı kaydedilsin değilmi
nasıl oluyorda

ActiveWorkbook.Saved = True
Application.Quit

yazınca kaydetmeden çıkıyor

 

[security]

Rica ederim kolay Gelsin...
ActiveWorkbook.Save
kaydet

ActiveWorkbook.Saved = True
kaydetme

 

[baydeniro]

Çok teşekkürler, tam aradığım bir kod. Sağlıcakla kalın.

 

[security]

Çok teşekkürler, tam aradığım bir kod. Sağlıcakla kalın.

Rica Ederim kolay gelsin...