Excelで別のセルの値に基づいてセルをロックまたはロック解除するにはどうすればよいですか？

場合によっては、別のセルの値に基づいてセルをロックまたはロック解除する必要があるかもしれません。例えば、セルA1に「承認中」という値が入力されている場合、範囲B1:B4をロック解除し、セルA1に「拒否中」という値が入力されている場合はその範囲をロックしたいとします。これを実現するにはどうすればよいでしょうか？この記事ではその方法をご紹介します。

VBAコードを使用して別のセルの値に基づいてセルをロックまたはロック解除する

VBAコードを使用して別のセルの値に基づいてセルをロックまたはロック解除する

次のVBAコードを使用すると、Excelで別のセルの値に基づいてセルをロックまたはロック解除できます。

1. シートタブ（特定のセルを別のセルの値に基づいてロックまたはロック解除するシート）を右クリックし、右クリックメニューから「コードの表示」を選択します。

2. 次に、以下のVBAコードをコピーしてCodeウィンドウに貼り付けます。

VBAコード：別のセルの値に基づいてセルをロックまたはロック解除する

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A1") = "Accepting" Then
        Range("B1:B4").Locked = False
    ElseIf Range("A1") = "Refusing" Then
        Range("B1:B4").Locked = True
    End If
End Sub

3. Alt + Qキーを同時に押して Microsoft Visual Basic for Applicationsウィンドウを閉じます。

これ以降、セルA1に「承認中」という値を入力すると、範囲B1:B4がロック解除されます。

セルA1に「拒否中」という値を入力すると、指定された範囲B1:B4が自動的にロックされます。

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！

関連記事：

• Excelですべてのセル参照を一度にロックするにはどうすればよいですか？
• Excelでデータ入力後にセルをロックまたは保護するにはどうすればよいですか？
• Excelでピクチャ/画像をセルに固定するにはどうすればよいですか？