アフィリエイト広告を利用しています

ワークシートをパスワードで保護するマクロ

Protectメソッドでワークシートを保護して変更を禁止します。

ワークシートを変更するには、パスワードを入れて「シートの保護」を解除します。

パスワードは数字に限らず自由に設定できます。

目次

Worksheets(“シート名”).Protectメソッド

ワークシートをパスワードで保護します。

■ コード内を「Wクリック」で選択できます。

Sub サンプル4150()
ActiveSheet.Protect Password:="qwerty"
End Sub

ActiveSheet.Protect Password:=”qwerty”
’ アクティブシートにパスワード”qwerty”を設定します。

■ マクロの実行結果
マクロの実行後にワークシートを変更しようとすると、警告が出ます。
「OK」をクリックします。

「ファイル」をクリックします。
情報画面の「ブックの保護」にある、「保護解除」をクリックします。

パスワードを入力して、シートの保護を解除します。

ActiveSheet.Unprotectメソッド

Unprotectメソッドを実行して、パスワードを解除します。

■ コード内を「Wクリック」で選択できます。

Sub サンプル4155()
ActiveSheet.Unprotect
End Sub

■ マクロの実行結果
パスワードを入力して解除します。

ActiveSheet.Unprotect (パスワード)

マクロのコードにパスワードも設定します。

■ コード内を「Wクリック」で選択できます。

Sub サンプル4160()
ActiveSheet.Unprotect Password:="qwerty"
End Sub

ActiveSheet.Unprotect Password:=”qwerty”
’ 解除と同時にパスワードの入力は必要なくなります。

■ マクロの実行結果
解除と同時に変更できるようになります。

以上で「ワークシートをパスワードで保護するマクロ」の説明を終わります。

目次