Excel2000VBAで保護設定を自動化したのですが．．

質問

Excel2000使用です。
VBAは初心者で、自動記録に毛がはえたような知識しかありませんが、よろしくお願いします。

シートの保護及び解除をVBAで自動化したのですが、自動記録だとパスワードの設定が出来ません。
構文のなかにこのパスワードを記録させるにはどのようにしたらよろしいのでしょうか？
ご教示下さい。

回答No.2

shishishishi · ベストアンサー

No1です。

解除もでしたね。
こうです。

Sub test2()
ActiveSheet.Unprotect Password:="pass"
End Sub

お礼

ありがとうございました。
おかげさまで解決できました。

回答No.1

shishishishi

たとえばこんな感じで出来ますよ。

Sub test()
ActiveSheet.Protect Password:="pass"
End Sub

お礼

ありがとうございました。