Excelでワークシートの保護を切り替える（オン/オフ）にはどうすればよいですか？

最初の方法では、Excelで特定のワークシートの保護を切り替えるためのVBAを紹介します。以下の手順に従ってください：

1. Alt + F11キーを同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. [挿入] → [モジュール]をクリックし、開いたモジュールウィンドウに以下のVBAコードを貼り付けます。

VBA: Excelで特定のワークシートの保護を切り替える

Sub ToggleProtect()
If ActiveSheet.ProtectContents Then
ActiveSheet.Unprotect "password"
Else
ActiveSheet.Protect "password"
End If
End Sub

注意: 上記のコードでは、「password」の両方を、この特定のワークシートを保護するために使用した正確なパスワードに置き換えてください。

3. Alt + F8キーを同時に押してマクロダイアログボックスを開き、マクロ名ボックスで「ToggleProtect」を選択してから、[オプション ]ボタンをクリックします。

4. 開いたマクロオプションダイアログボックスで、このVBA用のショートカットキーを指定し、[OK]ボタンをクリックします。

今回の例では、Ctrl + uをこのVBAのショートカットキーとして指定しています。

5. マクロダイアログボックスを閉じます。

これで、Ctrl + uキーを同時に押すとこのワークシートが保護解除され、再度 Ctrl + u キーを押すとこのワークシートが再び保護されます。

Kutools for Excelがインストールされている場合、ワークシートデザイン設定を構成することで、Excelでのクリックだけでワークシートの保護を切り替えることができます。

1. [エンタープライズ] → [ワークシートデザイン ]をクリックしてデザインタブをアクティブにし、デザインタブの[オプション ]ボタンをクリックします。スクリーンショットをご覧ください：

2. 開いたデザインツールオプションダイアログボックスで、[保護 ]セクションに移動し、以下を行います：

(1) 「デザインツールを開く前にワークシートの保護を解除する」オプションと「デザインツールを閉じる前にワークシートを保護する 」オプションをチェックします；

(2) [パスワードを使用 ]ボックスに、現在のワークシートを保護するために使用したパスワードを入力してください。

3. デザインツールオプションダイアログボックスの[OK]ボタンをクリックします。

これで、[エンタープライズ]タブの[ワークシートデザイン]ボタンをクリックすると、このワークシートは自動的に保護解除されます。

また、 [デザイン]タブの[デザインビューを閉じる] ボタンをクリックすると、このワークシートは自動的に保護されます。