Hoe selecteer ik alle ontgrendelde cellen in Excel?

Voor zover we allemaal weten, zijn Excel-cellen standaard vergrendeld. Wanneer we het werkblad beschermen en enkele specifieke celwaarden moeten wijzigen, moeten we eerst de cellen ontgrendelen. Maar hoe kun je alle ontgrendelde cellen vinden en selecteren als je iets wilt veranderen?

Selecteer alle ontgrendelde cellen met VBA-code

Selecteer alle ontgrendelde cellen met Kutools voor Excel

---

Selecteer alle ontgrendelde cellen met VBA-code

De volgende VBA-code kan u helpen snel alle ontgrendelde cellen tegelijk te selecteren, doe dit als volgt:

1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic voor toepassingen venster.

2. Klik Invoegen > Moduleen plak de volgende code in het modulevenster.

VBA-code: selecteer alle ontgrendelde cellen

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. Druk vervolgens op F5 sleutel om deze code uit te voeren, en alle ontgrendelde cellen zijn geselecteerd. Vervolgens kunt u deze celwaarden wijzigen nadat het werkblad is beveiligd.

Opmerkingen:

• 1.Als er geen ontgrendelde cellen in uw werkblad staan, wordt deze code niet van kracht.
• 2. Deze VBA-code wordt alleen toegepast voor het gebruikte bereik

---

Selecteer alle ontgrendelde cellen met Kutools voor Excel

Als u niet bekend bent met VBA-code, kunt u hiermee ook alle ontgrendelde cellen selecteren met een klik Selecteer Unlocked Cells of Kutools for Excel.

Kutools voor Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Get it Now.

Als je Kutools voor Excel hebt geïnstalleerd, doe dan als volgt:

1. Selecteer het bereik of het hele werkblad waarvoor u het ontgrendelde celbereik wilt selecteren.

2. Klikken Kutools > Selecteer Tools > Selecteer Unlocked Cells, zie screenshot:

3. En dan zijn alle ontgrendelde cellen in uw selectie in één keer geselecteerd zoals in de volgende schermafbeelding:

Wilt u meer weten over deze functie, klik dan op Selecteer Unlocked Cells.

---

Gerelateerd artikel:

Hoe alle vergrendelde cellen in Excel te identificeren en te selecteren?