Hi all,
i have a workbook and i want to run a macro to unprotect the workbook by prompting for a password first.
Now if i want to prompt the user for a password and then unprotect the SHEET then using the following is fine:
However when i use:
ActiveSheet.Unprotect
i get an runtime error that the password supplied is incorrect (even though i haven't supplied one).ActiveWorkbook.Unprotect
Does anyone know how to get a password prompt there?
Thanks
James
Hi jamesryan,
The code to unprotect a passworded sheet is as following:
to prompt for the user to enter a password you can do this:Sheets("Sheet Name").Unprotect "Password Here" 'Or (in your case) ActiveSheet.Unprotect "Password Here"
Dim pwd As String pwd = InputBox("Please enter the password:") On Error GoTo WrongPW ActiveSheet.Unprotect pwd Exit Sub WrongPW: MsgBox ("The password is incorrect")
There are only 10 types of people in the world:
Those who understand binary, and those who don't!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks