Using VB to protect and unprotect a sheet

[Pauljj]

For reasons that remain unclear some code I used to unprotect a sheet has stopped working

I know it used to work before, oddly enough I can unprotect it in the manual way, by going to Review and Unprotect sheet, so I know there is nothing wrong with the password

The code I have used is

s1.UnProtect Password = 0123

s1 being the name assigned to the current sheet.

I had also tried, just to make sure s1 was correctly assigned

ActiveSheet.UnProtect Password = 0123

But this doesn't work either

I don't get any error when I step through it

Any ideas please ?

Thanks

 

[jkpieterse]

The password argument is a string and you pass a number, try:

s1.UnProtect Password = "0123"

Reason why your code fails: 0123 converts to the number 123 and is subsequently passed as the string "123", which of course is different from the password "0123"

 

[Pauljj]

The password argument is a string and you pass a number, try:

s1.UnProtect Password = "0123"

Reason why your code fails: 0123 converts to the number 123 and is subsequently passed as the string "123", which of course is different from the password "0123"

I tried that but it didn't make any difference?

 

[jkpieterse]

Apologies, the correct syntax is:

s1.UnProtect Password:="0123"

(note the : )

 

[Pauljj]

Apologies, the correct syntax is:

s1.UnProtect Password:="0123"

(note the : )

That's it!! Thank you very much