How to execute a macro in a protected worksheet?

I create a new macro in my spreadsheet, and now I can't protect it because
the macro won't work. please let me know.
thks
Hanoi

Hanoi, one way,

Const PW As String = "123" 'Change Password Here
ActiveSheet.Unprotect Password:=PW
'you code here
ActiveSheet.Protect Password:=PW


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Ha Noi" <Ha [email protected]> wrote in message
news:[email protected]...
> I create a new macro in my spreadsheet, and now I can't protect it because
> the macro won't work. please let me know.
> thks
> Hanoi