Hur låser eller låser man upp celler baserat på värden i en annan cell i Excel?
I vissa fall kan du behöva låsa eller låsa upp celler baserat på värden i en annan cell. Du behöver till exempel intervallet B1: B4 vara upplåst om cell A1 innehåller värdet "Accepterar"; och att låses om cell A1 innehåller värdet ”Refusing”. Hur kan du göra för att uppnå det? Den här artikeln kan hjälpa dig.
Lås eller låsa upp celler baserat på värden i en annan cell med VBA-kod
Lås eller låsa upp celler baserat på värden i en annan cell med VBA-kod
Följande VBA-kod kan hjälpa dig att låsa eller låsa upp celler baserat på värde i en annan cell i Excel.
1. Högerklicka på arkfliken (arket med celler som du behöver för att låsa eller låsa upp baserat på värden i en annan cell) och klicka Visa kod från högerklickmenyn.
2. Kopiera och klistra sedan in följande VBA-kod i kodfönstret.
VBA-kod: Lås eller låsa upp celler baserat på värden i en annan cell
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "Accepting" Then
Range("B1:B4").Locked = False
ElseIf Range("A1") = "Refusing" Then
Range("B1:B4").Locked = True
End If
End Sub
3. tryck på andra + Q samtidigt för att stänga Microsoft Visual Basic för applikationer fönster.
Från och med nu, när du anger värdet "Accepterar" i cell A1, är området B1: B4 olåst.
När du anger värdet "Refusing" i cell A1 låses det angivna området B1: B4 automatiskt.

Lås upp Excel Magic med Kutools AI
- Smart utförande: Utför celloperationer, analysera data och skapa diagram – allt drivs av enkla kommandon.
- Anpassade formler: Skapa skräddarsydda formler för att effektivisera dina arbetsflöden.
- VBA-kodning: Skriv och implementera VBA-kod utan ansträngning.
- Formeltolkning: Förstå komplexa formler med lätthet.
- Textöversättning: Bryt språkbarriärerna i dina kalkylblad.
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 jag bild / bild till eller inuti cellen i Excel?
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!