Excelでロックされていないすべてのセルを選択するにはどうすればよいですか？

ご存知の通り、Excelのセルはデフォルトでロックされています。ワークシートを保護し、特定のセルの値を変更する必要がある場合、まずそのセルのロックを解除する必要があります。しかし、変更を行う際に、すべてのロックされていないセルを見つけて選択するにはどうすればよいでしょうか？

VBAコードを使用してすべてのロックされていないセルを選択する

Kutools for Excelを使用してすべてのロックされていないセルを選択する

VBAコードを使用してすべてのロックされていないセルを選択する

次のVBAコードを使用すると、すべてのロックされていないセルを一度に素早く選択できます。以下の手順を行ってください：

1. ALT + F11キーを押すと、Microsoft Visual Basic for Applicationsウィンドウが開きます。

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

VBAコード：すべてのロックされていないセルを選択

Sub SelectUnlockedCells()
'Update 20130830
Dim WorkRng As Range
Dim OutRng As Range
Dim Rng As Range
On Error Resume Next
Set WorkRng = Application.ActiveSheet.UsedRange
Application.ScreenUpdating = False
For Each Rng In WorkRng
    If Rng.Locked = False Then
        If OutRng.Count = 0 Then
            Set OutRng = Rng
        Else
            Set OutRng = Union(OutRng, Rng)
        End If
    End If
Next
If OutRng.Count > 0 Then OutRng.Select
Application.ScreenUpdating = True
End Sub

3. そして、F5キーを押してこのコードを実行すると、すべてのロックされていないセルが選択されます。その後、ワークシートが保護された状態でこれらのセルの値を変更できます。

注意：

• 1. ワークシートにロックされていないセルがない場合、このコードは効果を持ちません。
• 2. このVBAコードは使用範囲にのみ適用されます。

Kutools for Excelを使用してすべてのロックされていないセルを選択する

VBAコードに慣れていない場合でも、Kutools for Excelの「ロックされていないセルを選択」機能を使えば、クリック一つで全てのロックされていないセルを選択できます。

Kutools for Excel: 300以上の便利なExcelアドインを搭載し、30日間無制限で無料試用可能。いますぐ入手してください。

Kutools for Excelをインストールしている場合は、次のように操作してください：

1. ロックされていないセルの範囲を選択したい範囲またはワークシート全体を選択します。

2. 「Kutools」＞「選択」＞「ロックされていないセルを選択」をクリックします。

3. すると、選択範囲内のすべてのロックされていないセルが一度に選択され、次のスクリーンショットのように表示されます：

この機能についてさらに詳しく知りたい場合は、「ロックされていないセルを選択」をクリックしてください。

関連記事：

Excelでロックされているすべてのセルを識別して選択するにはどうすればよいですか？