Hur låser man angivna celler utan att skydda hela kalkylbladet i Excel?

Normalt måste du skydda hela kalkylbladet för att låsa celler från redigering. Finns det någon metod för att låsa celler utan att skydda hela kalkylbladet? Den här artikeln rekommenderar en VBA-metod för dig.

Lås angivna celler utan att skydda hela kalkylbladet med VBA

Lås angivna celler utan att skydda hela kalkylbladet med VBA

Om du antar att du måste låsa cell A3 och A5 i det aktuella kalkylbladet, kommer följande VBA-kod att hjälpa dig att uppnå det utan att skydda hela kalkylbladet.

1. Högerklicka på arkfliken och välj Visa kod från högerklickmenyn.

2. Kopiera och klistra in nedanstående VBA-kod i kodfönstret. Se skärmdump:

VBA-kod: Lås angivna celler utan att skydda hela kalkylbladet

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Row = 3 Or Target.Row = 5 Then
            Beep
            Cells(Target.Row, Target.Column).Offset(0, 1).Select
        End If
    End If
End Sub

Anmärkningar: I koden, Kolonnen 1, Rad = 3 och Rad = 5 ange cell A3 och A5 i nuvarande kalkylblad kommer att vara låsta efter att koden har körts. Du kan ändra dem efter behov.

3. tryck på andra + Q samtidigt för att stänga Microsoft Visual Basic för applikationer fönster.

Nu är cell A3 och A5 låsta i det aktuella kalkylbladet. Om du försöker välja cell A3 eller A5 i det aktuella kalkylbladet flyttas markören automatiskt till den intilliggande cellen.

Relaterade artiklar:

• Hur låser jag alla cellreferenser i formler samtidigt i Excel?
• Hur låser eller skyddar celler efter datainmatning eller inmatning i Excel?
• Hur låser eller låser man upp celler baserat på värden i en annan cell i Excel?
• Hur låser jag bild / bild till eller inuti cellen i Excel?
• Hur låser man cellbredd och höjd från att ändra storlek i Excel?