Exceli Kapatırken beklemeyi Gösterecek bir uyarı

[jackbe]

Sayın hocalarım

bir kapatma butonanına ;

Private Sub CommandButton3_Click()

If MsgBox("Çıkmak İsediğinize Eminmisiniz?", vbQuestion + vbOkCancel, "çıkış" = vbCancel TGhen Exit Sub
ActiveWorkbook.Save
ActiveWorkbook.Quit

End Sub

şeklinde bir çıkış işlemi yaptırıyorum.program tam SAVE yaparken "lütfen bekleyiniz,yada zaman sayıcı vb.. bir uyarı nasıl ekleyebilirim?

 

[security]

Sayın hocalarım

bir kapatma butonanına ;

Private Sub CommandButton3_Click()

If MsgBox("Çıkmak İsediğinize Eminmisiniz?", vbQuestion + vbOkCancel, "çıkış" = vbCancel TGhen Exit Sub
ActiveWorkbook.Save
ActiveWorkbook.Quit

End Sub

şeklinde bir çıkış işlemi yaptırıyorum.program tam SAVE yaparken "lütfen bekleyiniz,yada zaman sayıcı vb.. bir uyarı nasıl ekleyebilirim?

Bunun gibi Mi?
Not: VBA Şifresi: excel

 

[Skorpiyon]

Sayın security,

Neden VBA'da şifre ?

 

[security]

VBA Şifresini Yazmayı Unutmuşum. ekledim. Tşk.