Note: The other languages of the website are Google-translated. Back to English
English English

Hoe cel of rij markeren met selectievakje in Excel?

Zoals onderstaand screenshot laat zien, moet u rij of cel markeren met een selectievakje. Wanneer een selectievakje is aangevinkt, wordt een opgegeven rij of cel automatisch gemarkeerd. Maar hoe bereik je dit in Excel? Dit artikel laat je twee methoden zien om dit te bereiken.

Markeer cel of rij met selectievakje met voorwaardelijke opmaak
Markeer cel of rij met selectievakje met VBA-code


Markeer cel of rij met selectievakje met voorwaardelijke opmaak

U kunt een regel voor voorwaardelijke opmaak maken om cel of rij te markeren met een selectievakje in Excel. Ga als volgt te werk.

Koppel alles aan een opgegeven cel

1. U moet de selectievakjes een voor een handmatig in de cellen invoegen door op te klikken Ontwikkelaar > Invoegen > Selectievakje (Formulierbeheer).

2. Nu zijn er selectievakjes ingevoegd in de cellen in kolom I. Selecteer het eerste selectievakje in I1, voer de formule in = $ J1 in de formulebalk en druk vervolgens op Enter sleutel.

Tip: Als u geen waarden in aangrenzende cellen aan selectievakjes wilt koppelen, kunt u het selectievakje aan de cel van een ander werkblad koppelen, zoals = Blad3! $ E1.

2. Herhaal stap 1 totdat alle selectievakjes zijn gekoppeld aan de aangrenzende cellen of cellen in een ander werkblad.
Opmerking:: Alle gekoppelde cellen moeten opeenvolgend zijn en zich in dezelfde kolom bevinden.

Maak een regel voor voorwaardelijke opmaak

Nu moet u stap voor stap een regel voor voorwaardelijke opmaak maken.

1. Selecteer de rijen die u wilt markeren met selectievakjes en klik op Conditionele opmaak > Nieuwe regel onder de Home tabblad. Zie screenshot:

2. In de Nieuwe opmaakregel dialoogvenster, moet u:

2.1 Selecteer het Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt optie in het Selecteer een regeltype doos;

2.2 Voer de formule in = ALS ($ J1 = WAAR, WAAR, ONWAAR) in de Formatteer waarden waar deze formule waar is doos;
      Or = ALS (Sheet3! $ E1 = TRUE, TRUE, FALSE) als de selectievakjes zijn gekoppeld aan een ander werkblad.

2.3 Klik op de Formaat knop om een ​​gemarkeerde kleur voor de rijen op te geven;

2.4 Klik op de OK knop. Zie screenshot:

Opmerking:: In de formule, $ J1 or $ E1 is de eerste gekoppelde cel voor de selectievakjes en zorg ervoor dat de celverwijzing is gewijzigd in kolom absoluut (J1> $ J1 or E1> $ E1).

Nu is de regel voor voorwaardelijke opmaak gemaakt. Wanneer u de selectievakjes aanvinkt, worden de corresponderende rijen automatisch gemarkeerd als een screenshot van de balg.


Markeer cel of rij met selectievakje met VBA-code

De volgende VBA-code kan u ook helpen om cel of rij te markeren met een selectievakje in Excel. Ga als volgt te werk.

1. In het werkblad moet u een cel of rij markeren met een selectievakje. Klik met de rechtermuisknop op het Blad Tab en selecteer Bekijk code vanuit het rechtsklikmenu om het Microsoft Visual Basic voor toepassingen venster.

2. Kopieer en plak vervolgens de onderstaande VBA-code in het codevenster.

VBA-code: markeer rij met selectievakje in Excel

Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
    Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
    MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
    GoTo InputC
Else
    If xRng.Columns.Count = 1 Then
        For Each xCell In xRng        
            With ActiveSheet.CheckBoxes.Add(xCell.Left, _
               xCell.Top, xCell.Width = 15, xCell.Height = 12)
               .LinkedCell = xCell.Offset(, 1).Address(External:=False)
               .Interior.ColorIndex = xlNone
               .Caption = ""
               .Name = "Check Box " & xCell.Row
            End With    
            xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone                  
        Next        
    End If    
    With xRng    
     .Rows.RowHeight = 16    
    End With   
    xRng.ColumnWidth = 5#    
    xRng.Cells(1, 1).Offset(0, 1).Select    
    For Each xChk In ActiveSheet.CheckBoxes   
      xChk.OnAction = ActiveSheet.Name + ".InsertBgColor"      
    Next
End If
End Sub

Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes 
  xName = Right(xChk.Name, Len(xChk.Name) - 10) 
  If (xName = Range(xChk.LinkedCell).Row) Then   
   If (Range(xChk.LinkedCell) = "True") Then   
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6    
   Else    
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone  
   End If  
  End If
Next
End Sub

3. druk de F5 sleutel om de code uit te voeren. (Opmerking:: je moet de cursor in het eerste deel van de code plaatsen om de F5-toets toe te passen) In de pop-up Kutools for Excel dialoogvenster, selecteer het bereik dat u wilt invoegen selectievakjes en klik vervolgens op de OK knop. Hier selecteer ik bereik I1: I6. Zie screenshot:

4. Vervolgens worden selectievakjes in geselecteerde cellen ingevoegd. Vink een van de selectievakjes aan, de bijbehorende rij wordt automatisch gemarkeerd zoals onderstaand screenshot.


Gerelateerde artikelen:


De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.
kte tabblad 201905

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 elke dag honderden muisklikken!
officetab onderkant
Comments (3)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Ik heb een vraag over de eerste stap van het koppelen van het selectievakje aan een waar/onwaar.

1. Schakel het eerste selectievakje in I1 in, voer de formule = $ J $ 1 in de formulebalk in en druk vervolgens op Enter.

2. Herhaal stap 1 totdat alle selectievakjes zijn gekoppeld aan de aangrenzende cellen.

Moet het voor de herhaling voor elke cel worden gedaan of kun je het naar beneden slepen om automatisch aan te vullen? Op dit moment, wanneer ik het hoekvak naar beneden sleep, wordt het automatisch gevuld met = $ J $ 1 voor alles, zodat als ik één vakje aanvink, elk vakje is aangevinkt. Hoe kan ik dit oplossen zonder elk selectievakje handmatig te koppelen?
Deze opmerking is gemaakt door de moderator op de site
Hoi,
De vulhendel kan in dit geval niet helpen. U moet elk selectievakje handmatig koppelen aan de aangrenzende cel.
Deze opmerking is gemaakt door de moderator op de site
Dit is een verschrikkelijk artikel. Het mist veel informatie en stappen. Als je dit artikel letterlijk volgt, zal het niet eindigen in het resultaat dat je zoekt.

In wezen zegt het artikel dat het 2 kolommen heeft waar de selectievakjes zijn gekoppeld aan aangrenzende kolommen om waarden in te voeren die vervolgens worden gebruikt voor voorwaardelijke opmaak. Niemand wil dat waarden in aangrenzende cellen worden gekoppeld aan selectievakjes. Ten slotte, als dit de route is die u gaat, koppelt u geen selectievakjes aan voorwaardelijke opmaak, u koppelt selectievakjes aan celwaarden die op hun beurt worden gekoppeld aan voorwaardelijke opmaak.

Het is gemakkelijker om gewoon pictogrammen te gebruiken in plaats van selectievakjes (gebruik het groene vinkje) en de voorwaardelijke opmaak te maken voor een waarde van 1 of 0. Als cel = 1 dan zal het de waarde vervangen door het pictogram en uw rij markeren. Om dit te bereiken gebruik je 2 conditionele formaten op je table.

Linksboven in de tabel is B4, rechtsonder in de tabel is L28

1e voorwaardelijke opmaak:
GEBRUIK EEN FORMULE OM TE BEPALEN WELKE CELLEN U MOET FORMATEREN
Formule: =$B4=1
Formaat: vul
Geldt voor: =$B4:$L28

2e voorwaardelijke opmaak:
FORMAT CELLEN OP BASIS VAN HUN WAARDEN
Icon Set Aangepast
ALLEEN PICTOGRAM WEERGEVEN (vink dit vakje uit)
Eerste pictogram (groen vinkje) als waarde > = 1 is (type: getal)
Tweede icoon (geen icoon) wanneer waarde > = -1 is (type: getal)
Derde icoon (geen icoon) wanneer < -1

Als ik nu een 1 invoer in B4 of een van de B-kolomcellen, wordt de hele rij voor mij gemarkeerd en wordt de "1" vervangen door een vinkje.

INGEBOUWDE SJABLOON MET DEZE OPMAAK:
1) Open Excel, zoek naar een nieuwe sjabloon. Voer "Voorraad" in als zoekterm
2) Selecteer de sjabloon met de titel "Inventarislijst met markering"
3) Markeer de eerste rij van de tabel, open voorwaardelijke opmaak om te beheren/bewerken. U zult zien dat de 2e en 3e formaten voor hoogtepunten zijn en het pictogram in de B-kolom. U kunt het pictogram wijzigen in wat u maar wilt. Verwijder de eerste indeling als u de doorgestreepte opties niet wilt in de kolom Beëindigd.
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties