Çıkışta yedek alayım

[stres]

Arkadaşlar ekteki yedek alma ile ilgili dosyayı formumuz üyerileri olan 1Al2Ver ve zipir123 ün çalışmalarına katkıları olan halit3 hocamın vermiş olduğu her iki yanıtı harmanlayarak oluşturdum. Ben bu dosya da işlem yaptıktan sonra kapatacağım zaman Userformu açsın ve “YEDEKLEME YAPMADAN KAPATAMAZSINIZ” uyarısını vererek yedek almamı sağladıktan sonra kapanmasını istiyorum. Teşekkürler.

 

[Ömer]

Merhaba,

Eğer yedek almak zorunlu ise bence uyarı verdiymeye gerek yok. Yedek içindeki kodları ThisWorbook sayfasında aşağıdaki bölgeye kopyalayın. Programdan her çıkışta yedek otomatik alınır.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 
kodlarınız..
 
End Sub

.

 

[stres]

Merhaba,

Eğer yedek almak zorunlu ise bence uyarı verdiymeye gerek yok. Yedek içindeki kodları ThisWorbook sayfasında aşağıdaki bölgeye kopyalayın. Programdan her çıkışta yedek otomatik alınır.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 
kodlarınız..
 
End Sub

.

teşekkürler hocam uyguladım iyide oldu ilerleyen aşamalarda yine yardımlarınıza başvururum sevgi ile kalın