Hoe gebruik ik het selectievakje om rijen of kolommen in Excel te verbergen / zichtbaar te maken?

Stel dat u een selectievakje moet gebruiken om bepaalde rijen of kolommen te verbergen of zichtbaar te maken. Als het selectievakje Active X Control bijvoorbeeld is aangevinkt, worden bepaalde rijen of kolommen weergegeven, anders worden ze verborgen. Dit artikel laat zien hoe u het selectievakje kunt gebruiken om rijen of kolommen in Excel met details te verbergen / zichtbaar te maken.

Gebruik het selectievakje om rijen of kolommen met VBA-code te verbergen / zichtbaar te maken

Gebruik het selectievakje om rijen of kolommen met VBA-code te verbergen / zichtbaar te maken

De volgende VBA-code kan u helpen bepaalde rijen of kolommen te verbergen / zichtbaar te maken met een selectievakje.

1. Na het invoegen van een Active X Control-selectievakje in het werkblad, klikt u met de rechtermuisknop op het selectievakje en selecteert u Bekijk code vanuit het rechtsklikmenu. Zie screenshot:

2. In de Microsoft Visual Basic voor toepassingen venster, kopieer en plak de volgende VBA-code in het codevenster.

VBA-code: gebruik het selectievakje om rijen of kolommen te verbergen / zichtbaar te maken

Private Sub CheckBox1_Click()
    [C:D].EntireColumn.Hidden = Not CheckBox1
End Sub

Notes:

1. In de VBA-code, [CD]. Volledige kolom betekent dat de kolommen C en D worden verborgen of zichtbaar gemaakt door het overeenkomstige selectievakje aan of uit te vinken.

2. Voor het verbergen of weergeven van bepaalde rijen, zoals rij 6: 9, wijzigt u de [CD]. Volledige kolom naar [6: 9]. Hele rij in de VBA-code.

3. druk de anders + Q toetsen tegelijk om het Microsoft Visual Basic voor toepassingen venster.

4. Schakel nu het Ontwerpmodus onder de Ontwikkelaar tabblad zoals hieronder getoond screenshot:

Vanaf nu, wanneer het selectievakje is aangevinkt, worden de opgegeven rijen of kolommen weergegeven. Als het niet is aangevinkt, zijn de opgegeven rijen of kolommen verborgen.

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.

Lees verder... Gratis download... Aankoop...

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!

Lees verder... Gratis download... Aankoop...

18 Comments
Login

Sort by Newest
- Best
- Popular
- Newest
- Oldest

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.
etb1025 · 8 months ago
What if i wanted to use 3 different checkboxes and wanted them to each toggle hiding different groups of rows? I have tried and looked all over. When I try to modify this code the checkboxes seem to interfere with each other.
- Reply
To post as a guest, your comment is unpublished.
Eric · 8 months ago
What if i wanted to use 3 different checkboxes and wanted them to each toggle hiding different groups of rows? I have tried and looked all over. When I try to modify this code the checkboxes seem to interfere with each other.
- Reply
To post as a guest, your comment is unpublished.
Maggie · 1 years ago
Very useful, but how can I use it to hide just a part of the spreadsheet? I mean for example cells B2:B11, how to combine those two functions? Thanks.
- Reply
To post as a guest, your comment is unpublished.
angela · 2 years ago
It worked, but then when I saved the file, and reopen it doesn't work. I tried saving it as a Macro excel sheet and as a regular workbook. What have I done wrong? I want to give it to someone else to use and don't want them to be confused.
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 1 years ago
  
  Hi angela,
  After adding the code into workbook, please click File > Save as, choose where to save the file, in the Save As dialog box, choose Excel Macro-Enabled Workbook (*.xlsm) from the Save as type drop-down, and finally click Save. Then send this Excel Macro-Enabled workbook to others.
  
  Reply
To post as a guest, your comment is unpublished.
May · 2 years ago
I was try to unhide the first three role but it was not work.How can I do it ,I know it the person who send me that file wanna know my skill I can solve it or not.
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi May,
  Sorry I didn't get your point.
  
  Reply
To post as a guest, your comment is unpublished.
Therese · 2 years ago
Hello,

Is there a way to hide only one row. If I put 6:9 all rows are hidden, but if I only put 6, it comes out as error. Would appreciate your help, thank you!
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi,
  Please change the second line in the code to:
  [6:6].EntireRow.Hidden = Not CheckBox1.
  Thank you for your comment.
  
  Reply
To post as a guest, your comment is unpublished.
Lou · 2 years ago
Hi,

Hi, I've done the code, it's work good but when I try to make the same in more than one checkbox at the same sheet they work 'together', only hide or unhide the rows if all three checkboxes are selected.
I am tryint to make these three checkboxes works independent one from another. And let the users mark only one box for at time.
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi Lou,
  Please make sure the checkboxes you created are ActiveX Controls checkboxes. These checkboxes works independently in your worksheet.
  Thanks for your comment.
  
  Reply
To post as a guest, your comment is unpublished.
Ed · 2 years ago
Hello,

I am trying to use this code to hide/unhide on a separate sheet from the checkbox. What do I have to add to make this work? Thanks in advance.

Private Sub CheckBox1_Click()
[C:D].EntireColumn.Hidden = Not CheckBox1
End Sub
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Good day,
  As the following code shown, please replace the "Sheet4" with your separate sheet name.
  
  Private Sub CheckBox1_Click()
  [Sheet4!C:D].EntireColumn.Hidden = Not CheckBox1
  End Sub
  
  Reply
To post as a guest, your comment is unpublished.
Cole · 3 years ago
It seems like this code will only go one direction, i.e. only hide and not unhide them when clicked. Is there a way to correct this?
- Reply
- To post as a guest, your comment is unpublished.
  Kentthegreet · 3 years ago
  
  We have same problem but find a way to make it work. Please use ActiveX Controls checkbox and not at the Form Control checkbox. The code perfectly works with ActiveX checkbox.
  
  Private Sub CheckBox1_Click()
  [C:D].EntireColumn.Hidden = Not CheckBox1
  End Sub
  
  Reply
- To post as a guest, your comment is unpublished.
  Kentthegreet · 3 years ago
  
  We have same problem but I found out we're using Form Controls and not ActiveX Controls. The code perfectly works in ActiveX Control Checkbox button. Just turn off the Design Mode so you can click check the Checkbox.
  
  Reply
To post as a guest, your comment is unpublished.
Pieter Ramaut · 4 years ago
@Wayne:

Private Sub CheckBox1_Click()
ActiveSheet.Unprotect Password:="xxxxx"
Rows("284:351").EntireRow.Hidden = Not CheckBox1
ActiveSheet.Protect Password:="xxxx"
End Sub
- Reply
To post as a guest, your comment is unpublished.
Wayne Bailey · 4 years ago
Is there a way to use the "Use checkbox to hide/unhide rows or columns with VBA code" on a protected worksheet?
- Reply

Log in op uw account

Wachtwoord Resetten