do you want to protect workbooks? yes/no (vba)

[lezawang]

Hi
I know how to protect workbook in vba using

workbooks(1).protect
workbooks(1).unprotect

What I want to do is to ask user this question:

do you want to protect workbooks? yes/no

If user say yes then I do
wrokbooks(1).protect

If user say no then I do
workbooks(1).unprotect

Any idea how this can be done? I know I need to use If statement but how can I get the Yes and No from the user? Thank you very much.

 

[Michael M]

Maybe this

Sub MM1()
Dim ans As String
ans = MsgBox("Do you want to protect the workbook ? ", vbYesNo)
If ans = vbYes Then
Workbooks(1).Protect
Else: Exit Sub
End If
End Sub