Hoe checkbox aangevinkt te maken op basis van celwaarde in Excel?
U weet wellicht hoe u een celwaarde kunt wijzigen op basis van een selectievakje. Maar weet u hoe u een selectievakje automatisch kunt laten aanvinken op basis van een celwaarde in Excel? Dit artikel laat je methoden zien om dit te bereiken.
Maak het selectievakje aangevinkt op basis van de celwaarde met de formule
Maak het selectievakje aangevinkt op basis van de celwaarde met VBA-code
Maak het selectievakje aangevinkt op basis van de celwaarde met de formule
Stel dat u wilt dat het selectievakje 1 automatisch wordt aangevinkt als de waarde in cel A1 gelijk is aan "Test". Ga als volgt te werk.
1. Nadat u het selectievakje (Formulierbeheer) heeft ingevoegd, selecteert u het en koppelt u het aan een gespecificeerde cel C2 door in te voeren = C2 in de formulebalk.
Voor Controle ActiveX selectievakje, klik er met de rechtermuisknop op en selecteer Properties vanuit het rechtsklikmenu. En in de Properties dialoogvenster voert u het gekoppelde cel in de Gekoppelde cel veld en sluit vervolgens het dialoogvenster. Zie screenshot:
2. Selecteer de omlijnde cel (C2) en voer de formule in = ALS (A2 = "Test", TRUE, FALSE) in de formulebalk en druk vervolgens op Enter sleutel.
Note: In de formule zijn A2 en Test de cel en de celwaarde waarvan u het selectievakje automatisch moet laten controleren op basis van.
3. Wanneer u de waarde "Test" invoert in cel A1, wordt het overeenkomstige selectievakje automatisch aangevinkt. Zie screenshot:
Opmerking: deze formule is niet hoofdlettergevoelig.
Maak het selectievakje aangevinkt op basis van de celwaarde met VBA-code
U kunt de volgende VBA-code uitvoeren om het selectievakje in te schakelen op basis van de celwaarde in Excel.
1. Klik met de rechtermuisknop op het Blad Tab met het selectievakje aangevinkt op basis van de celwaarde en klik vervolgens op Bekijk code vanuit het rechtsklikmenu.
2. In de Microsoft Visual Basic voor toepassingen venster, kopieer en plak de onderstaande VBA-code in het codevenster.
VBA-code: schakel het selectievakje in op basis van de celwaarde
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A2").Value = "Test" Then
ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn
Else
ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff
End If
End SubNote: In de code zijn A2 en Test de cel en de celwaarde waarvan u het selectievakje automatisch moet laten controleren op basis van. Selectievakje 1 is de naam van het selectievakje.
3. druk op anders + Q -toetsen om het venster Microsoft Visual Basic for Applications te sluiten.
Bij het invoeren van de waarde "Test" in cel A2, wordt het gespecificeerde selectievakje automatisch aangevinkt.
Note: Deze code is hoofdlettergevoelig.
Tip: Als u meerdere selectievakjes in bulk in een geselecteerd bereik wilt invoegen, kunt u het Batch invoegen selectievakjes nut van Kutools for Excel, of batch meerdere optieknoppen invoegen met de Batch invoegen optieknoppen nut. Bovendien kunt u alle selectievakjes in één keer verwijderen met de Batchverwijder selectievakjes hulpprogramma zoals hieronder weergegeven screenshots. Je kan gaan naar download Kutools voor Excel! (30 dagen gratis uitproberen).
Gerelateerde artikelen:
- Hoe verander ik een gespecificeerde celwaarde of kleur wanneer het selectievakje is aangevinkt in Excel?
- Hoe cel of rij markeren met selectievakje in Excel?
- Hoe een datumstempel in een cel invoegen als een selectievakje in Excel is aangevinkt?
- Hoe gegevens filteren op basis van selectievakjes in Excel?
- Hoe het selectievakje te verbergen wanneer de rij is verborgen in Excel?
- Hoe maak je een vervolgkeuzelijst met meerdere selectievakjes in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
