Giriş Şifresi Sorma

[erkanfun]

EK'teki dosya açılışta şifre soruyor(Şifre : 123). Bu şifre makrosunu nasıl koruma altına alabiliriz? Yani makro durdurma yöntemlerini nasıl etkisiz hale getirebiliriz?

 

[suleyman242]

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
   If CloseMode = vbFormControlMenu Then
      MsgBox "Lütfen Kapat Tuşunu Kullanınız", vbOKOnly, ""
      Cancel = True
   End If
End Sub

Bu kodu yazmıştım ama bu userform kapat tuşu için .

 

[erkanfun]

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
   If CloseMode = vbFormControlMenu Then
      MsgBox "Lütfen Kapat Tuşunu Kullanınız", vbOKOnly, ""
      Cancel = True
   End If
End Sub

Bu kodu yazmıştım ama bu userform kapat tuşu için .

Cevabınızdan bir şey anlayamadım.

 

[suleyman242]

Cevabınızdan bir şey anlayamadım.

userformları durdurma yöntemlerini etkisiz hale getirmek içindi yolladığım kod