uitvoering van opdracht via togglebutton wachtwoord beveiligd

[Friend]

Beste forummers,

Hoe kan ik een wachtwoord plaatsen op een togglebutton.

Dus de opdracht wordt pas uitgevoerd als eerst het wachtwoord wordt ingevoerd en daarna moet de togglebutton weer beveiligd worden met het wachtwoord.

Heeft iemand hier een oplossing voor?

Hartelijk dank alvast.

Friend

 

[Friend]

Yes, gevonden op:

http://www.mrexcel.com/forum/excel-questions/66214-password-protected-command-button.html

Sub test_inputbox()
Dim mypassword
tryagain:
mypassword = InputBox("Enter Password", "Password")
If mypassword = "YourPassword" Then

'your code here
MsgBox ("Correct")
Else
If MsgBox("Password incorrect, try again?", vbYesNo, "Wrong password") = vbYes Then GoTo tryagain
End If
End Sub

Bedankt allemaal, mocht dit voor verbetering vatbaar zijn dan hoor ik het graag.

Friend