Macro to Prompt for Password and Unprotect Sheet

I use the following on a button to hide columns of sensitive information and protect the sheet so the form can be e-mailed with a level of privacy.

Please Login or Register  to view this content.

I have a second button with the following code that unprotects it and unhides the columns.

Please Login or Register  to view this content.

This, of course, is not secure at all. I would like a box to pop up and prompt me for the password before it executes the other functions.

If there is a better way to do all of this I am always learning and would love to hear it!

Thanks in advance.

@slindfors

Code Tags Added
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html



( I have added them for you today. Please take a few minutes to read all Forum Rules and comply in the future.)