Excel マクロ ifステートメントでシート保護を判別するには？

質問

こんにちは。
Excelでマクロを作成していますが、どうしても解らないので質問しました。
解る方いましたら回答よろしくお願いします。

ifステートメントで「シート保護」の有無を条件にしたいのですが、うまくいきません。

　if activesheet.unprotect = true then
　 処理１
　else
　 処理２
　end if

としていますが、「シート保護」の有無に関係なく、常に処理２となってしまいます。

回答No.1

noname#240783 · ベストアンサー

Unprotectは「メソッド」ですねぇ。
シートまたはブックの保護を解除します。
ですから、いつも結果が同じになってしまいます。

ご質問の場合は、例えば
If ActiveSheet.ProtectContents = True Then
MsgBox "処理1"
Else
MsgBox "処理2"
End If
のように、ProtectContentsプロパティを判別すれば
いいと思います。
他に、ProtectWindow、ProtectStructure等々関連プロパティが
ありますのでヘルプで検索して検討してみてください。

お礼

回答ありがとうございます。
ProtectContentsプロパティにより無事動作しました。
ありがとうございました。

回答No.2

imogasi

if activesheet.unprotect = true then
をif ActiveSheet.ProtectContents = true then
と
ProtectContentsプロパティを使うのだろうと思います。
他にProtectScenarios、ProtectStracture、ProtectDrawingObjectsなどと分かれているようです。

お礼

回答ありがとうございます。
ProtectContentsプロパティにより無事動作しました。
ありがとうございました。
他に教えていただいたプロパティについても勉強してみます。