【VBA】シートの保護/保護の解除をする

シートを保護する方法は複数あります!

ここでは私が1番シンプルと考える方法を
記載します!

シートの
 ・保護はメソッド「Protect」
 ・保護の解除はメソッド「Unprotect」
で実現できます!

ここではパスワードを使用する例を
記載します!

PR

シートの保護をする

シート「sample」の保護をします。
ここでは保護をする際のパスワードとして、「password123」を設定します。

Sub sheetProtectSample()

    'シートを保護する
    Worksheets("sample").Protect Password:="password123"
    
End Sub


上記を実行後にシート「sample」の変更を試みると、変更不可である旨が表示されます。

シートが保護されている
シートが保護されている
PR

シートの保護を解除する

シート「sample」の保護の解除をします。
ここでは保護を解除する際のパスワードとして、「password123」を指定します。

Sub sheetUnProtectSample()

    'シートの保護を解除する
    Worksheets("sample").Unprotect Password:="password123"
    
End Sub


上記を実行後にシート「sample」の変更を試みると、問題無く変更できます。

シートが保護が解除されている
シートが保護が解除されている
PR

参考①

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●Protect


●Unprotect

PR

参考②

ブックの保護/保護の解除もできます。詳細は以下の記事をご確認ください。