Excelで空白でないセルをロックして保護するにはどうすればよいですか？

例えば、データ範囲内にいくつかの空白セルが含まれているワークシートがあり、今度はすべてのデータセルをロックして保護し、新しい値を入力できるように空白セルはロックしないようにしたいとします。Excelで空白でないセルだけをできるだけ早くロックして保護するには、どのようにすればよいでしょうか？

「シートの保護」機能を使用して選択した範囲内のすべての空白でないセルをロックして保護する

VBAコードを使用して使用範囲内のすべての空白でないセルをロックして保護する

「シートの保護」機能を使用して選択した範囲内のすべての空白でないセルをロックして保護する

通常、この作業は次の手順で段階的に実行できます：

1. データセルをロックして保護したいセル範囲を選択し、「ホーム」タブから「検索と選択」→「条件を選択して移動」をクリックしてください。スクリーンショットをご覧ください：

2. 「条件を選択して移動」ダイアログボックスで、「選択」セクションから「空白セル」を選択してください。スクリーンショットをご覧ください：

3. 「OK」ボタンをクリックすると、すべての空白セルが一度に選択され、次にCtrl + 1キーを押して「セルの書式設定」ダイアログを開き、「 保護」タブで「ロック」オプションのチェックを外してください。スクリーンショットをご覧ください：

4. 「OK」をクリックし、次に「 校閲」タブから「シートの保護」をクリックし、必要に応じてパスワードを入力して確認します。スクリーンショットをご覧ください：

5. ダイアログを閉じるため「OK」をクリックすると、すべてのデータセルが保護され、空白セルのみが保護解除された状態になります。

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

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

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

VBAコードを使用して使用範囲内のすべての空白でないセルをロックして保護する

上記の方法には複数のステップがありますが、これをできるだけ迅速に行うために、以下のVBAコードが役立ちますので、次の手順を行ってください：

1. ALT + F11キーを押して「Microsoft Visual Basic for Applications」ウィンドウを開きます。

2. 次に「挿入」→「モジュール」をクリックし、以下のコードをモジュールウィンドウに貼り付けます。

VBAコード：ワークシート内のすべての空白でないセルをロックして保護する

Sub UnlockEmptyCells()
'Updateby Extendoffice
    Application.ScreenUpdating = False
    Cells.Locked = True
    Selection.SpecialCells(xlCellTypeBlanks).Locked = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
    Application.ScreenUpdating = True
End Sub

3. そしてF5キーを押してこのコードを実行すると、使用範囲内の空白でないセルが一気に保護されます。