Note: The other languages of the website are Google-translated. Back to English
Inloggen  \/ 
x
or
x
Registreer  \/ 
x

or

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 voor u!
officetab onderkant
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    PixelBoi · 2 years ago
    This is a horrendous article. It lacks a lot of information and steps. If you follow this article verbatim it will not end in the result you are seeking.

    Essentially the article is saying to have 2 columns where the checkboxes are linked to adjacent columns to enter in values which are then used for conditional formats. No one wants to have values associated in adjacent cells to checkboxes. Lastly, if this is the route you're going you're not linking checkboxes to conditional formats, you are linking checkboxes to cell values which are then in turn associated to conditional formats.

    It is easier to just use icons instead of checkboxes (use the green checkmark icon) and create the conditional formats for a value of 1 or 0. If cell = 1 then it will replace the value with the icon and highlight your row. To accomplish this you use 2 conditional formats on your table.

    Top left of table is B4, bottom right of table is L28

    1st conditional format:
    USE A FORMULA TO DETERMINE WHICH CELLS TO FORMAT
    Formula: =$B4=1
    Format: fill
    Applies to: =$B4:$L28

    2nd conditional format:
    FORMAT CELLS BASED ON THEIR VALUES
    Icon Set Custom
    SHOW ICON ONLY (check this box off)
    First icon (green checkmark) when value is > = 1 (type: number)
    Second icon (no icon) when value is > = -1 (type: number)
    Third icon (no icon) when < -1

    Now, when I enter a 1 in B4 or any of the B column cells, it will highlight the entire row for me and replace the "1" with a checkmark.

    BUILT-IN TEMPLATE WITH THIS FORMATTING:
    1) Open Excel, search for a new template. Enter "Inventory" as the search term
    2) Select the template titled "Inventory list with highlighting"
    3) Highlight the first row of the table, open conditional formats to manage/edit. You will see the 2nd and 3rd formats are for highlights and the icon in the B column. You can change the icon to whatever you want. Remove the first format if you don't want the strikeout options from the Discontinued column.
  • To post as a guest, your comment is unpublished.
    ExcelUser · 2 years ago
    I have a question about the initial step of linking the checkbox to a true/false.

    1. Select the first check box in I1, enter formula =$J$1 into the formula bar, and then press the Enter key.

    2. Repeat step 1 until all check boxes are linked to the adjacent cells.

    For the repeat, does it have to be done for each cell or can you get the drag down to autofill? Right now, when I drag down the corner box it will autofill with =$J$1 for everything so that if I check one box, every box is checked. How can I fix this without manually linking each checkbox?
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi,
      The Fill Handle can't help in this case. You need to manually link each checkbox to its adjacent cell.