マクロでブックの保護、解除をしたい

パスワードの入力時停止させパスワード入力後保護が終了時点でマクロを終了したい。又ブックの解除もパスワード入力後終了させたいのですが教えてください
お願いします。

No.1 ベストアンサー 回答者： merlionXX 回答日時： 2005/12/04 14:57

ご質問の意味がつかめませんが、マクロでブック保護をする、または解除するのはこういう記述です。

パスワードは1234としてみました。

Sub ブック保護()
ActiveWorkbook.Protect Password:="1234"
End Sub

Sub ブック保護解除()
ActiveWorkbook.Unprotect Password:="1234"
End Sub

この回答への補足

パスワードをキーボドより入力したいのです。

補足日時：2005/12/04 15:19

この回答へのお礼

長いマクロの中に入れたいのですがどうしたらよいのか
判りませんでした、しかし別の方法で行うことにしました
ありがとうございました。

お礼日時：2005/12/06 21:08

No.2 回答者： moooon 回答日時： 2005/12/06 10:09

質問の意味不明です。

No1に対する補足も何を言わんとしているのかわかりません。