VB Relocks non-protected cell

[Launchnet]

I used the following vb code to protect the active worksheet with a password and it works. xyz is my example password.

ActiveSheet.Protect Password:="xyz"

BUT, I have one cell that is not proctected and when I run this code, it protects all of the cells, even the one that I have formatted as Not Protected.

Can anyone give me a lift. I think I need a different way of protecting the activesheet.

[davesexcel]

I used the following vb code to protect the active worksheet with a password and it works. xyz is my example password.

ActiveSheet.Protect Password:="xyz"

BUT, I have one cell that is not proctected and when I run this code, it protects all of the cells, even the one that I have formatted as Not Protected.

Can anyone give me a lift. I think I need a different way of protecting the activesheet.

Hi,
I suppose you could use a code before you protect the sheet, but I do not see why the range would lock itself

    Range("B1").Locked = False
ActiveSheet.Protect Password:="xyz"