Hoe voeg je snel meerdere selectievakjes in Excel in?

Hoe kunnen we snel meerdere selectievakjes invoegen in Excel? Volg deze handige methoden in Excel:

Voeg meerdere selectievakjes in met Vulgreep

Voeg meerdere selectievakjes in met VBA-code

Voeg en verwijder meerdere selectievakjes met één klik door Kutools voor Excel te gebruiken

Voeg meerdere selectievakjes in met Vulgreep

In Excel is de Vulgreep een krachtige functie om veel dingen te doen. Het kan ook selectievakjes invullen. Eerst moet je een selectievakje invoegen. Doe het volgende:

1. Klik op Ontwikkelaar in de menubalk, klik dan op Invoegen en kies het selectievakje-afbeelding onder Formulierbesturingselement. Zie screenshot:

2. Klik op de afbeelding van het selectievakje en je ziet een plus-tekenwijzer, klik waar je het selectievakje wilt toevoegen.

3. Selecteer het selectievakje en verplaats het naar een cel, en verwijder vervolgens de naam van het selectievakje.

4. Selecteer vervolgens de cel waarin het selectievakje zich bevindt. Sleep daarna de vulgreep over het bereik van cellen dat je wilt invullen. Zie screenshot:

Voeg meerdere selectievakjes in met VBA-code

Als je denkt dat de eerste methode enigszins lastig is, kan de volgende VBA-code je helpen om eenvoudig en snel meerdere selectievakjes in te voegen.

1. Klik op Ontwikkelaar > Visual Basic, er verschijnt een nieuw Microsoft Visual Basic for Applications-venster, klik op Invoegen > Module, en voer de volgende code in de Module in:

Sub InsertCheckBoxes()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Ws As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Ws = Application.ActiveSheet
Application.ScreenUpdating = False
For Each Rng In WorkRng
    With Ws.CheckBoxes.Add(Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        .Characters.Text = Rng.Value
    End With
Next
WorkRng.ClearContents
WorkRng.Select
Application.ScreenUpdating = True
End Sub

2. Klik vervolgens op knop om de code uit te voeren. Er verschijnt een pop-upvenster om u eraan te herinneren een bereik van cellen te selecteren waar u de selectievakjes wilt invoegen. Zie screenshot:

3. Klik vervolgens op OK, de selectievakjes zijn netjes en mooi ingevoegd in het bereik. Zie screenshot:

Voeg meerdere selectievakjes in met Kutools voor Excel

Hier kan ik je een gemakkelijke en handige manier introduceren om meerdere selectievakjes in te voegen - Kutools voor Excel, met de functie Batch Insert Check Box kun je selectievakjes invoegen in lege cellen of cellen met gegevens.

Nadat je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:

1. Selecteer een bereik van cellen waar je de selectievakjes wilt invoegen.

2. Klik op Kutools > Invoegen > Batch Insert Check Boxes, zie screenshot:

3. Je geselecteerde cellen zijn nu gevuld met de selectievakjes zoals in de volgende screenshots wordt getoond:

Selectievakjes invoegen in lege cellen	Selectievakjes invoegen in datacellen

Gerelateerd artikel:

Hoe verwijder je snel meerdere selectievakjes in Excel?