Good morning.  A couple of weeks ago, someone from this forum, was very
helpful in my question on how to unprotect protected worksheets, with similar
passwords, with a macro.  Below is a copy of the VB script I was given.  It
worked but then I realized, the password "hi" is now visible under the macro
script.  Is there a way to rewrite the code so that it will not show the
password and instead when the macro is run, one has to enter the password
before the macro can unprotect the protected worksheets?

thank you very much,
Storm

Option Explicit
sub testme()
 dim myPWD as string
 dim wks as worksheet
 myPWD = "hi"
 for each wks in activeworkbook.worksheets
   wks.unprotect password:=mypwd
 next wks
end sub