Salt Okunur Açmayı Engellemek.

1 2 3 4 5 6 7 8 9 10 11 12 13
28/05/2020, 21:03

feraz

Alttaki kodlada kaydetme olur diye biliyorum yanlış hatırlamıyorsam 


ActiveWorkbook.Close True
28/05/2020, 21:05

m_demir

Tamam Hocam kaydet olarak sizin kodunuzu ekliyecem.
28/05/2020, 21:19

feraz

Alttaki gibide oluyormış kod workbook kapatma kodu içinde.Artık hangisi uyarsa abey denemesi zaten bedava
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.DisplayAlerts = True
End Sub
28/05/2020, 21:20

m_demir

Çok teşekkürler Hocam
28/05/2020, 21:22

feraz

Ben çok yerde close true yada yerine göre false olan kodları görmüş ve bu şekilde yardım etmiştim.Mesela örnek 10 tane kapalı exceli açtırıp bir yerlerinde değişiklik yaptırıp kapatmak için close true yöntemi kullanılıyordu save olanda kullanılır sonuçta ikiside kaydeder.

(28/05/2020, 21:20)m_demir yazdı: Çok teşekkürler Hocam
Rica ederiz.
28/05/2020, 21:26

m_demir

Hocam Bu kod kalacak mı Application.Quit
1 2 3 4 5 6 7 8 9 10 11 12 13