Prompt user when unprotecting sheet

I'm trying to make a popup show up when the user tries to unprotect a protected sheet. The popup will tell them they're doing something sketchy and ask if they really want to do it (yes/no). Then, based on that response, I'll have the sheet unprotect or stay protected. I've tried to combine codes from these two websites (making the necessary tweaks):

http://stackoverflow.com/questions/2...event-in-excel
and
http://www.vb6.us/tutorials/understa...d-visual-basic

I ended up with the following:

Please Login or Register  to view this content.

The code works fine when I manually run the macro UnprotectAlert... It pops up only if the sheet is currently protected, and then if I click yes, the sheet will unprotect, and if I click no, it will stay protected)... BUT it doesn't actually get triggered when I unprotect the sheet. What am I missing?

I'm a newbie to VBA, but a decent programmer/logical person . Thanks for any help y'all can give!!

For anyone stumbling upon this thread, I'll post the way I ended up making this work. I had the message box come up when a user changes the selection, the sheet is unprotected, and a variable I defined in another module (CalcInvalidated) is true. I put that variable in there so that the popup would only show up once, not every time the user changes the selection while the sheet is unprotected.

Please Login or Register  to view this content.

Note: booleans are initialized as False as the default.

Please Login or Register  to view this content.

Thanks to the other users on here whose posts I worked off of to get this working.