Allow Cell Formatting in a userform

Good morning/afternoon/evening

I would like to ask you kind people for a little more help. I have created a userform to password protect/unprotect all worksheets at once with help from this forum. What i would like is to activate the check box so that if i would like to allow cell formatting i can. See image below. Another thing if possible, is when i input the password, is there a way a popup can appear to confirm password. This is what i have so far....

Please Login or Register  to view this content.

Your help or suggestions would be appreciated greatly

To allow formatting if the checkbox is checked, ad the following code after the Dim wSheet as Worksheet line of the code you posted above..

Please Login or Register  to view this content.

Can you attach a sample workbook with your userform and code please? I'm trying to make a mock-up of what you have and things aren't making sense to be when I do. I'd rather work with the real thing so I can do a better job of helping you out. The code I provided should only work on the active sheet if the checkbox is checked and with my mock-up, I'm getting the same results as you are.

pkool,
Just wanted to let you know I haven't forgotten about you. I was on vacation last week and was just now able to take a look at your workbook. The only thing I've noticed is that there is 1 or 2 lines that might be creating the problem you are having.
Here is the code with those 2 lines commented out...

Please Login or Register  to view this content.

The problem is that the Checkbox code I provided will only work on the sheet that is active when the code runs.