未分類

Excel VBA - ワークシートの保護または保護の解除を行う

Excel VBA - ワークシートの保護または保護の解除を行うことができます。

準備

1. フォーム (Form1) にコマンドボタン (CommandButton1) を配置します。

2. フォーム (Form1) にコマンドボタン (CommandButton2) を配置します。

サンプルコード

1. コードを記述します。

Private Sub CommandButton1_Click()
  Sheets("Sheet1").Protect
End Sub Private

Sub CommandButton2_Click()
  Sheets("Sheet1").Unprotect
End Sub

説明

CommandButton1 をクリックするとシートを保護し、CommandButton2 をクリックするとシートの保護を解除します。

-未分類