投稿/コメントを表示します。

小川さん

会社の資料で、すべてのシート(一部除く)に対して、"password"というパスワード有りのシート保護をする作業をしています。
(シート数は100位あります)
(当然、会社の資料なので現物はお見せできません)

が、なぜかシートによって 正しくパスワード付きの保護になる場合もあれば、パスワードなしの保護になってしまう場合も
あり、規則性がよくわかりません。(パスワードなし保護の場合、”シートの保護の解除"を押せば簡単に解除されてしまうため、
保護をする意味があまりありません)

構文は以下のような単純なものです。
ファイルの拡張子は、xltm というものです。

Sub hoge()

Dim W As Worksheet
For Each W In Worksheets

W.Protect Password:="password"

Next
End Sub

この現象について、お心あたりはありますでしょうか。
2022/12/13 22:07