Hoe maak je een cel alleen-lezen in Excel?

In veel gevallen moet je anderen mogelijk voorkomen om bepaalde cellen in je werkblad te bewerken. Dit artikel biedt twee methoden om je te helpen bepaalde cellen alleen-lezen te maken, zodat anderen deze cellen niet kunnen bewerken, behalve voor lezen.

Maak een cel alleen-lezen door het werkblad te beveiligen
Maak een cel alleen-lezen met VBA-code zonder het werkblad te beveiligen

Maak een cel alleen-lezen door het werkblad te beveiligen

Je kunt alleen de cellen vergrendelen die je alleen-lezen wilt maken, en vervolgens dit werkblad beschermen om dit te bereiken. Volg de volgende stappen.

1. Klik op de knop in de linkerbovenhoek van het huidige werkblad om alle cellen te selecteren.

2. Druk tegelijkertijd op Ctrl + 1 om het dialoogvenster Celopmaak te openen. In het dialoogvenster vink je het vakje Vergrendeld uit onder het tabblad Beveiliging, en klik je op de knop OK. Zie screenshot:

3. Selecteer nu de cellen die je alleen-lezen wilt maken (hier selecteer ik de cellen in het bereik A1:C18). Druk tegelijkertijd op Ctrl + 1 om het dialoogvenster Celopmaak te openen, vink het vakje Vergrendeld aan onder het tabblad Beveiliging en klik op de knop OK.

4. Ga verder en klik op Beoordeling > Werkblad beveiligen. Zie screenshot:

5. Specificeer en bevestig je wachtwoord om het werkblad te beschermen zoals weergegeven in de onderstaande screenshot.

Nu zijn de cellen in het vergrendelde bereik alleen-lezen. Wanneer je probeert deze specifieke cellen binnen het bereik te bewerken, krijg je een promptvenster zoals weergegeven in de onderstaande screenshot.

Maak een cel alleen-lezen met VBA-code zonder het werkblad te beveiligen

Als je het werkblad niet wilt beschermen om een cel alleen-lezen te maken, helpt het VBA-script in deze sectie je om dit probleem eenvoudig op te lossen.

1. Klik met de rechtermuisknop op het tabblad van het werkblad waarin je een cel alleen-lezen wilt maken, en klik vervolgens op Weergavecode in het rechtermuisknopmenu.

2. Kopieer en plak de onderstaande VBA-code in het Code-venster in het venster Microsoft Visual Basic for Applications dat wordt geopend.

VBA-code: Maak een cel alleen-lezen in Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Row = 3 Or Target.Row = 4 Or Target.Row = 5 Then
            Beep
            Cells(Target.Row, Target.Column).Offset(0, 1).Select
            MsgBox Cells(Target.Row, Target.Column).Address & " cannot be selected and edited as it is a read-only cell", _
            vbInformation, "Kutools for Excel"
        End If
    End If
End Sub

Opmerking: Deze code kan alleen bepaalde cellen in één kolom alleen-lezen maken. In deze code worden de cellen A3, A4 en A5 alleen-lezen gemaakt in het huidige werkblad.

3. Druk op Alt + Q om het venster Microsoft Visual Basic for Applications te sluiten.

Wanneer je op cel A3, A4 of A5 klikt in het huidige werkblad, krijg je een Kutools voor Excel dialoogvenster zoals weergegeven in de onderstaande screenshot, en zal de cursor automatisch naar de rechter aangrenzende cel verplaatsen.