Embed un-protect password in a macro?

[gidsy]

Hi,

Is there a way I can unprotect a sheet at the beginning and then protect it again at the end of a macro? I want the sheet to have a password.

Cheers.

 

[Michael M]

Hi Gidsy
Try

ws.Unprotect "password"

at the beginning of the code

AND

ws.Protect "password"

at the end ....change "password" to whatever you want as your password

 

[gidsy]

Many thanks....this works...

Do you have code that will set the options when you protect the sheet again....e.g. edit cells, delete rows etc...?

 

[Michael M]

Depending on which settings you want....simply use the macro recorder to select the settings and then copy and paste to the rest of your macro.
Like

ws.Protect "password", DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingRows:=True, AllowDeletingRows:=True, AllowSorting:=True