| 
    
     |  | ▼S.Satoh さん: 
 こんにちは
 
 想像ですが、おそらく、このモジュールには Option Explicitがないと思われます。
 もしあれば、変数としてのpasswardの宣言がないのでコンパイルエラーになります。
 
 Option Explicitがないので、変数passwardが、その場で生成されます。
 で、ActiveSheet.Protect Password:="AAAA" は
 ActiveSheet.Protect "AAAA" ともかくことができます。
 
 ActiveSheet.Protect passward = ("hoge")
 
 この passward = ("hoge") が "AAAA" にあたります。
 では passward = ("hoge") とはなんでしょう?
 これは文字列比較をしています。比較結果はアンマッチですから False となります。
 従って パスワードの値として False を設定していることになります。
 
 解除のときも
 Activesheet.Unprotect passward = ("hogehoge")
 つまり False で解除しているわけですね。
 
 この False は入力できないと思いますので解除は手動では無理でしょうね。
 
 
 |  |