Protect / Unptotect Password when I run a Macro

[gmouttou]

I have the below code in my sheet and the program runs well. The problem I have is, when I choose the second criteria, the page ( Name Check ) unprotects and does not protect again... Criteria 1, works well ( Name Check - Group)

Please help.

Am having the code in a notepad and not posting here as I do not know how to code tag...am sorry.

https://drive.google.com/file/d/0B14...it?usp=sharing

[djfatboyfats]

Place this at the top of your code

Please Login or Register  to view this content.

Then this at the end

Please Login or Register  to view this content.

[gmouttou]

Place this at the top of your code

Please Login or Register  to view this content.

Then this at the end

Please Login or Register  to view this content.

Thanks. I have tried that and it works only for the 1st 'IF' criteria, and un protects for the 2nd 'IF' criteria and does not protect it back.

[djfatboyfats]

Do you have a sample file I can look at?