KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe maakt u in Excel een keuzelijst met meerdere selectievakjes?

AuteurSiluvia Wijzigingsdatum

Traditionele keuzelijsten in Excel beperken gebruikers tot één optie. Om deze beperking te omzeilen en meerdere selecties mogelijk te maken, bespreken we hier twee praktische methoden om keuzelijsten met meerdere selectievakjes te creëren.

Gebruik een keuzelijst (list box) om een keuzelijst met meerdere selectievakjes te maken
A: Maak een keuzelijst met Brongegevens
B: Geef de cel een naam waarin u de Aantal Geselecteerde Items plaatst
C: Voeg een vorm in om de Aantal Geselecteerde Items weer te geven
Maak eenvoudig een keuzelijst met selectievakjes met een geweldige tool
Meer handleidingen over keuzelijsten...


Gebruik een keuzelijst (list box) om een keuzelijst met meerdere selectievakjes te maken

Zoals in de onderstaande schermafbeelding te zien is, fungeren alle namen in bereik A2:A11 op het huidige werkblad als brongegevens voor de keuzelijst in cel C4. Wanneer u op dit vak klikt, vouwt de lijst met selecteerbare items uit en wordt het aantal geselecteerde items weergegeven in cel E4. Volg deze stappen om dit te realiseren:

Een schermafbeelding van het brongegevensbereik voor een keuzelijst met meerdere selectievakjes in Excel

A. Maak een keuzelijst met brongegevens

1. Klik op Ontwikkelaar > Invoegen > Keuzelijst (ActiveX-besturingselement). Zie schermafbeelding:

Een schermafbeelding van het selecteren van de optie Keuzelijst onder het tabblad Ontwikkelaar in Excel

2. Teken een keuzelijst in het huidige werkblad, klik er met de rechtermuisknop op en selecteer Eigenschappen in het contextmenu.

Een schermafbeelding van de optie Eigenschappen in het contextmenu van de keuzelijst

3. Configureer het dialoogvenster Eigenschappen als volgt.

  • 3,1 Voer in het vak ListFillRangehet Bronbereik in dat u in de lijst wilt weergeven (hier geef ik bereik)A2:A11);
  • 3,2 Selecteer in het vak ListStyle1 - fmList StyleOption;
  • 3,3 Selecteer in het vak MultiSelect1 – fmMultiSelectMulti;
  • 3,4 Sluit het dialoogvenster Eigenschappen. Zie de schermafbeelding: Een schermafbeelding van het geconfigureerde dialoogvenster Eigenschappen voor een keuzelijst in Excel
B: Geef de cel een naam waarin u de Aantal Geselecteerde Items plaatst

Als u het totale aantal geselecteerde items in een specifieke cel, zoals E4, wilt weergeven, volgt u deze stappen.

1. Selecteer cel E4, typ ListBoxOutput in het Naamvak en druk op de toets Enter.

Een schermafbeelding die laat zien hoe u een cel een naam geeft om geselecteerde items te lokaliseren in Excel

C. Voeg een vorm in om het aantal geselecteerde items weer te geven.

1. Klik op Invoegen > Vormen > Rechthoek. Zie schermafbeelding:

Een schermafbeelding die laat zien hoe u een rechthoekige vorm invoegt in Excel

2. Teken een rechthoek in uw werkblad (hier teken ik de rechthoek in cel C4). Klik vervolgens met de rechtermuisknop op de rechthoek en selecteer Macro toewijzen in het contextmenu.

Een schermafbeelding van het toewijzen van een macro aan een rechthoekige vorm in Excel

3. Klik in het dialoogvenster Macro toewijzen op de knop Nieuw.

Een schermafbeelding van het dialoogvenster Macro toewijzen in Excel

4. Vervang in het venster Microsoft Visual Basic for Applications de oorspronkelijke code in het Module-venster door de onderstaande VBA-code.

VBA-code: Maak een lijst met meerdere selectievakjes

Sub Rectangle1_Click()
'Updated by Extendoffice 20200730
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("ListBoxOutput").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("ListBoxOutput") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("ListBoxOutput") = ""
    End If
End If
End Sub

Opmerking: In de code is Rectangle1 de naam van de vorm; ListBox1 de naam van de keuzelijst; Selecteer Opties en Pickup Options zijn de weergavetekst van de vorm; en ListBoxOutput is de celnaam van de uitvoercel. U kunt deze naar eigen wens aanpassen.

5. Druk tegelijkertijd op de toetsen Alt+Q om het venster Microsoft Visual Basic for Applications te sluiten.

6. Klik op de rechthoekknop om de keuzelijst in of uit te vouwen. Wanneer de lijst is uitgevouwen, vinkt u de gewenste items aan. Klik daarna opnieuw op de rechthoek om het totale aantal geselecteerde items in cel E4 weer te geven. Zie de demo hieronder:

7. Sla de werkmap vervolgens op als een Excel-werkmap met macro's ingeschakeld om de code in de toekomst opnieuw te kunnen gebruiken.


Maak een keuzelijst met selectievakjes met een geweldige tool

Moe van het complexe VBA-programmeren? Met Kutools voor Excel maakt u eenvoudig keuzelijsten met selectievakjes voor naadloze meervoudige selectie. Ideaal voor enquêtes, gegevensfiltering of dynamische formulieren: deze gebruiksvriendelijke tool stroomlijnt uw workflow en bespaart u tijd.

Kutools voor Excelbiedt meer dan 300 geavanceerde functies om complexe taken te stroomlijnen, waardoor creativiteit en efficiëntie worden verhoogd.Geïntegreerd met AI-mogelijkheden, automatiseert Kutools taken met precisie, zodat databeheer moeiteloos verloopt.Gedetailleerde informatie over Kutools voor Excel...         Gratis proefversie...

1. Open het werkblad waarop u gegevensvalidatie met een keuzelijst heeft ingesteld, klik op Kutools > Keuzelijst > Geavanceerde keuzelijst inschakelen. Klik vervolgens opnieuw op Selectievakjes toevoegen aan keuzelijst in het menu Keuzelijst. Zie schermafbeelding:

klik om Geavanceerde vervolgkeuzelijst in te schakelenpijl naar rechtsklik op de functie Vervolgkeuzelijst met selectievakjes

2. Configureer het dialoogvenster Selectievakjes toevoegen aan de keuzelijst als volgt.

  • 2,1) Selecteer de cellen met de keuzelijst;
  • 2,2) Voer in het vak Scheidingstekeneen scheidingsteken in dat u gebruikt om meerdere items te scheiden;
  • 2,3) Vink indien nodig het selectievakje Zoekfunctie inschakelen aan. (Als u deze optie inschakelt, kunt u later zoeken in de keuzelijst.)
  • 2,4) Klik op de knop OK.

    klik op de functie Vervolgkeuzelijst met selectievakjes

Vanaf nu verschijnt er een keuzelijst wanneer u op de cel met Keuzelijst klikt; Selecteer alstublieft items door de selectievakjes aan te vinken om ze in de cel weer te geven, zoals in de onderstaande demo.

Voor meer informatie over deze functie bezoekt u deze handleiding.

Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen

Dit artikel biedt twee methoden om eenvoudig een keuzelijst met selectievakjes in Excel te maken. Kies de methode die u het beste bevalt! Wilt u nog meer Excel-tips en -trucs ontdekken? Onze website biedt duizenden tutorials.


Gerelateerde artikelen:

Automatisch aanvullen bij typen in Excel-keuzelijst
Als u een keuzelijst met gegevensvalidatie hebt die veel waarden bevat, moet u vaak lang scrollen om de juiste waarde te vinden of het volledige woord direct in het invoervak typen. Als er een methode is die automatisch aanvult zodra u de eerste letter typt, wordt alles een stuk eenvoudiger. Deze handleiding biedt de oplossing voor dit probleem.

Keuzelijst maken vanuit een andere werkmap in Excel
Het is vrij eenvoudig om een keuzelijst met gegevensvalidatie te maken tussen werkbladen binnen één werkmap. Maar wat als de lijstgegevens die u nodig heeft voor de validatie zich in een andere werkmap bevinden? In deze handleiding leert u stap voor stap hoe u een keuzelijst maakt op basis van gegevens uit een andere werkmap in Excel.

Maak een doorzoekbare keuzelijst in Excel
Een keuzelijst met veel waarden doorzoeken om de juiste optie te vinden, is vaak tijdrovend. Eerder beschreven we al een methode voor automatisch aanvullen zodra u de eerste letter typt in het keuzelijstinvoervak. Naast die functie kunt u uw keuzelijst ook volledig doorzoekbaar maken, zodat u nog efficiënter de juiste waarde vindt. Probeer de methode uit deze handleiding!

Andere cellen automatisch invullen bij selecteren van een waarde in een Excel-keuzelijst
Stel dat u een keuzelijst hebt gemaakt op basis van de waarden in celbereik B8:B14. Wanneer u een waarde uit die lijst selecteert, wilt u dat de bijbehorende waarden uit celbereik C8:C14 automatisch worden ingevuld in een bepaalde cel. De methoden in deze handleiding helpen u dit eenvoudig voor elkaar te krijgen.

Meer handleidingen over keuzelijsten...

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...


Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

  • Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
  • Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!

Alle Kutools-add-ins in één installatieprogramma.

Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
  • Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
  • Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
  • 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
  • Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins