excel de sayfayı kapatırken bir hatırlatma yapmasını istiyorum.

[h.aykol_]

arkadaşlar çalıştığım bir excel safasını kapatırken kapat (x) tıklayınca , bana hatırlatma mesajı vermesini istiyorum."Sildiğin kişiyi defterden düş" diye nasıl yaparım.

 

[uzmanamele]

merhaba
sayfayı kapatınca mı kitabı kapatınca mı mesaj istiyorsunuz?

Private Sub Worksheet_Deactivate()
MsgBox "sildiğin kişiyi defterden düş!!!"
End Sub

 

[Ayhan Ercan]

Merhaba Sn h.akyol

Bir modüle aşağıdaki kodu yazıp deneyiniz...

Sub auto_close()
MsgBox "Sildiğin kişiyi defterden düş"
End Sub

 

[h.aykol_]

teşekkür ederiz arkadaşlar

 

[Hakantasal]

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "Eyvallah Abi Kaydettim !" & vbCrLf & vbCrLf & _
"TARİH" & Space(5) & Date & vbCrLf & _
"BUGÜN" & Space(4) & Format(Day(Date), "dddd") & vbCrLf & _
"SAAT" & Space(7) & Time & vbCrLf & vbCrLf & _
"HAKAN", vbInformation, "Hakan TAŞAL"
End Sub