Hvordan låses eller låses celler op baseret på værdier i en anden celle i Excel?
I nogle tilfælde skal du muligvis låse eller låse celler op baseret på værdier i en anden celle. For eksempel har du brug for området B1: B4 for at være låst op, hvis celle A1 indeholder værdien "Accepterer"; og skal låses, hvis celle A1 indeholder værdien "Refusing". Hvordan kan du gøre for at opnå det? Denne artikel kan hjælpe dig.
Lås eller låse celler op baseret på værdier i en anden celle med VBA-kode
Lås eller låse celler op baseret på værdier i en anden celle med VBA-kode
Den følgende VBA-kode kan hjælpe dig med at låse eller låse op celler baseret på værdi i en anden celle i Excel.
1. Højreklik på arkfanen (arket med celler, du skal låse eller låse op baseret på værdier i en anden celle), og klik Vis kode fra højreklikmenuen.
2. Kopier og indsæt derefter følgende VBA-kode i kodevinduet.
VBA-kode: Lås eller frigør celler baseret på værdier i en anden celle
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. Tryk på andre + Q taster samtidigt for at lukke Microsoft Visual Basic til applikationer vindue.
Fra nu af, når du indtaster værdien "Accepterer" i celle A1, låses området B1: B4 op.
Ved indtastning af værdi "Refusing" i celle A1 låses det angivne område B1: B4 automatisk.
Relaterede artikler:
- Hvordan låses alle cellereferencer i formler på én gang i Excel?
- Hvordan låses eller beskyttes celler efter dataindtastning eller input i Excel?
- Hvordan låses billede / billede til eller inde i cellen i Excel?
De bedste Office-produktivitetsværktøjer
Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%
- Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
- Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
- Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
- Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
- Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
- Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
- Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
- Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
- Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2021 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60 dages pengene tilbage garanti.

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!











































