Excel afkrydsningsfelter: Tilføj, vælg, slet og brug afkrydsningsfelter i Excel

Et afkrydsningsfelt er et interaktivt værktøj, som bruges til at vælge eller fravælge en mulighed, du vil ofte se dem på webformularer eller når du udfylder undersøgelser. I Excel kan du tilføje mangfoldige muligheder ved at markere eller fjerne markeringen i et afkrydsningsfelt, som gør dit ark mere dynamisk og interaktivt, såsom oprettelse af tjeklister ved afkrydsningsfelter, indsættelse af et dynamisk diagram ved afkrydsningsfelter osv.

I denne vejledning vil jeg introducere, hvordan du indsætter, vælger, sletter afkrydsningsfelter, og jeg vil give nogle eksempler på brugen af ​​dem i Excel.

---

To typer afkrydsningsfelter (Afkrydsningsfelt formularkontrol vs. afkrydsningsfelt ActiveX-objekt)

For at indsætte et afkrydsningsfelt skal du sørge for, at fanen Udvikler vises på båndet. Fanen Udvikler er ikke aktiv som standard, så du skal aktivere den først.

1. Klik på i Excel-projektmappen File (Felt) > Indstillinger. I Excel-indstillinger dialogboksen, klik Tilpas Bånd, så tjek Udvikler valg og klik OK for at lukke denne dialog.

2. Nu, den Udvikler fanen vises i Excel-båndet som vist nedenfor. Du kan få adgang til en række interaktive kontroller fra fanen Udvikler efter behov.

Microsoft Excel tilbyder to typer afkrydsningsfelter-Afkrydsningsfelt Formkontrol , Afkrydsningsfelt ActiveX-kontrolelement:

Afkrydsningsfelt Formkontrol er meget enklere end Afkrydsningsfelt ActiveX Control, og Afkrydsningsfelt ActiveX Control er mere fleksibel i design og kan bruges som objekter i koder. Til vores daglige arbejde er formularkontrollerne tilstrækkelige, så vi vil bruge dem i de fleste tilfælde.

Afkrydsningsfelt Formularkontrol vs. Afkrydsningsfelt ActiveX-objekt:

• ActiveX-kontroller giver flere formateringsmuligheder, du kan bruge dem til et sofistikeret og fleksibelt design;
• Formularkontrolelementer er indbygget i Excel, mens ActiveX-objekter indlæses separat, så de kan fryse lejlighedsvis;
• Nogle computere har ikke tillid til ActiveX-objekter som standard, så du skal aktivere dem manuelt fra Trust Center;
• Afkrydsningsfelt ActiveX-kontrol kan tilgås programmatisk via VBA-editoren;
• ActiveX leveres kun af Windows-indstillingen, og Mac OS understøtter det ikke.

Bemærk: Alle de afkrydsningsfelter, jeg taler om i følgende tutorials, er Afkrydsningsfelter Formkontrol.

---

Tilføj et eller flere afkrydsningsfelter i Excel

For at indsætte et eller flere afkrydsningsfelter kan dette afsnit gøre dig en tjeneste.

2.1 Indsæt ét afkrydsningsfelt

For at indsætte et afkrydsningsfelt skal du gøre følgende:

1. Klik Udvikler fanebladet, og klik derefter på indsatte fra Controls gruppe, og vælg derefter Afkrydsningsfelt under Formkontrol. Klik derefter på en celle, hvor du vil indsætte afkrydsningsfeltet, og afkrydsningsfeltet vises i nærheden af ​​den celle, se skærmbilleder:

2. Sæt derefter markøren over kanten af ​​valgfeltet for dit afkrydsningsfelt. Når det skifter til flyttemarkøren, kan du klikke og trække afkrydsningsfeltet ind i den celle, du har brug for, se skærmbilleder:

---

2.2 Indsæt flere afkrydsningsfelter

Hvis du har brug for flere afkrydsningsfelter i dit regneark, vil her tale om nogle hurtige måder for dig.

 Indsæt flere afkrydsningsfelter med valgmuligheden Fyldhåndtag

For hurtigt at indsætte flere afkrydsningsfelter skal du tilføje et afkrydsningsfelt som beskrevet ovenfor og derefter bruge indstillingen Fyldhåndtag til at udfylde afkrydsningsfelterne til andre celler.

1. Klik for at vælge den celle, hvor afkrydsningsfeltet er placeret.

2. Træk udfyldningshåndtaget ned for at udfylde afkrydsningsfelterne som vist nedenfor skærmbillede:

---

 Indsæt flere afkrydsningsfelter med VBA-kode

Følgende VBA-kode kan også hjælpe dig med at indsætte en liste over afkrydsningsfelter hurtigt og nemt. Gør venligst som dette:

1. Hold nede ALT + F11 nøgler til at åbne Vinduet Microsoft Visual Basic til applikationer.

2. Klik derefter på indsatte > Moduler, og indsæt følgende kode i Moduler vindue.

VBA-kode: Indsæt flere afkrydsningsfelter i en liste over celler

Sub InsertCheckBoxes()
'Update by 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

3. Og tryk derefter på F5 nøglen til at køre denne kode. En promptboks vil poppe ud for at minde dig om at vælge en række celler til at indsætte afkrydsningsfelterne. Se skærmbillede:

4. Klik derefter på OK knappen, indsættes afkrydsningsfelterne pænt i cellerne på én gang, se skærmbillede:

---

 Indsæt flere afkrydsningsfelter med en praktisk funktion

Hvis du har Kutools til Excel, Med Batchindsats afkrydsningsfelter funktion, kan du indsætte afkrydsningsfelterne i tomme celler eller celler med data med det samme.

Efter installation Kutools til Excelskal du gøre som dette:

1. Vælg et område af celler, hvor du vil indsætte afkrydsningsfelter.

2. Klik derefter på Kutools > indsatte > Batchindsats afkrydsningsfelter, se skærmbillede:

3. Og derefter er de valgte celler fyldt med afkrydsningsfelter som følgende skærmbilleder vist:

Indsæt afkrydsningsfelter i tomme celler	Indsæt afkrydsningsfelter i dataceller

---

Skift afkrydsningsfeltets navn og billedtekst

Når du bruger afkrydsningsfeltet i Excel, skal du skelne mellem afkrydsningsfeltets navn og billedtekstnavnet. Billedtekstnavnet er den tekst, du ser ved siden af ​​afkrydsningsfeltet, og afkrydsningsfeltets navn er det navn, du ser i feltet Navn, når afkrydsningsfeltet er markeret som vist nedenfor skærmbilleder:

Navn på afkrydsningsfelt	Navn på billedtekst

For at ændre billedtekstens navn skal du højreklikke på afkrydsningsfeltet og derefter vælge Rediger tekst fra kontekstmenuen, og skriv det nye navn, du ønsker, se skærmbilleder:

For at ændre afkrydsningsfeltets navn skal du markere afkrydsningsfeltet og derefter indtaste det navn, du har brug for i Navneboks som vist nedenstående skærmbillede:

---

Link et eller flere afkrydsningsfelter til celler

Når du bruger afkrydsningsfeltet, skal du ofte knytte afkrydsningsfelterne til celler. Hvis afkrydsningsfeltet er markeret, viser cellen TRUE, og hvis det ikke er markeret, viser cellen FALSK eller tom. Dette afsnit vil introducere, hvordan man sammenkæder et eller flere afkrydsningsfelter til celler i Excel.

4.1 Link et afkrydsningsfelt til en celle med Format Control-funktionen

For at knytte afkrydsningsfeltet til en bestemt celle, skal du gøre følgende:

1. Højreklik på afkrydsningsfeltet, og vælg derefter Formatkontrol fra kontekstmenuen, se skærmbillede:

2. I Format objekt under dialogboksen kontrol fanen, skal du klikke for at vælge en celle, hvor du vil linke til afkrydsningsfeltet fra Cellelink boks, eller skriv cellereferencen manuelt, se skærmbillede:

3. Klik OK for at lukke dialogboksen, og nu er afkrydsningsfeltet knyttet til en bestemt celle. Hvis du markerer det, vises et TRUE, fjern markeringen i det, en FALSE vises som vist nedenfor:

---

4.2 Link flere afkrydsningsfelter til celler med VBA-kode

For at knytte flere afkrydsningsfelter til celler ved at bruge funktionen Formatkontrol, skal du gentage ovenstående trin igen og igen. Dette vil være tidskrævende, hvis der er hundredvis eller tusindvis af afkrydsningsfelter, der skal sammenkædes. Her vil jeg introducere en VBA-kode til at linke flere afkrydsningsfelter til celler på én gang.

1. Gå til regnearket, som indeholder afkrydsningsfelterne.

2. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

3. Klik derefter på indsatte > Moduler, og indsæt følgende kode i Moduler Vindue.

VBA-kode: Link flere afkrydsningsfelter til celler på én gang

Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "C"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
    Cells(i, xCChar).Value = True
Else
    Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub

Bemærk: I denne kode, i = 2, nummeret 2 er startrækken i dit afkrydsningsfelt, og xCChar = "C", brevet C er den kolonne, hvor du vil linke afkrydsningsfelterne til. Du kan ændre dem efter dit behov.

4. Og tryk derefter på F5 for at køre denne kode, er alle afkrydsningsfelter i det aktive regneark knyttet til de angivne celler på én gang. Når du markerer et afkrydsningsfelt, vil dets relative celle vise TRUE, fjern markeringen i afkrydsningsfeltet, den linkede celle vil vise FALSE, se skærmbillede:

---

Vælg et eller flere afkrydsningsfelter

For at kopiere eller slette afkrydsningsfelterne i et regneark, skal du først markere afkrydsningsfelterne. For at markere et eller flere afkrydsningsfelter, skal du gøre følgende:

Vælg et enkelt afkrydsningsfelt: (to måder)

• Højreklik på afkrydsningsfeltet, og klik derefter hvor som helst i det.
• OR
• Tryk Ctrl nøgle, og klik derefter på afkrydsningsfeltet.

Vælg flere afkrydsningsfelter:

Tryk og hold på Ctrl tast, og klik derefter på de afkrydsningsfelter, du vil markere én efter én.

---

Slet et eller flere afkrydsningsfelter

Det er nemt for os at slette et afkrydsningsfelt, du skal bare markere det og derefter trykke på Delete-tasten på dit tastatur. Når det kommer til flere afkrydsningsfelter, hvordan kunne du gøre det i Excel?

6.1 Slet flere afkrydsningsfelter med VBA-kode

For at slette alle afkrydsningsfelter i et ark, kan du anvende følgende VBA-kode.

1. Hold nede ALT + F11 nøgler til at åbne Vinduet Microsoft Visual Basic til applikationer.

2. Klik derefter på indset> Moduler, og indsæt følgende kode i Modulvindue.

VBA-kode: Slet alle afkrydsningsfelter i det aktuelle regneark

Sub RemoveCheckboxes()
'Update by Extendoffice
On Error Resume Next
ActiveSheet.CheckBoxes.Delete
Selection.FormatConditions.Delete
End Sub

3. Tryk derefter på F5 nøglen til at udføre koden. Alle afkrydsningsfelter i det specifikke regneark vil blive slettet på én gang.

---

6.2 Slet flere afkrydsningsfelter med en simpel funktion

Med Kutools til Excel' Batch Slet afkrydsningsfelter funktion, kan du slette afkrydsningsfelterne fra en række udvalg eller hele arkene, som du har brug for med kun flere klik.

Efter installation Kutools til Excelskal du gøre som dette:

1. Vælg det celleområde eller hele arket, der indeholder afkrydsningsfelter, du vil fjerne.

2. Klik derefter på Kutools > Slette > Batch Slet afkrydsningsfelter, se skærmbillede:

3. Og derefter fjernes alle afkrydsningsfelter på én gang fra markeringen.

---

Grupper afkrydsningsfelter i Excel

Når du vil flytte eller ændre størrelsen på flere afkrydsningsfelter sammen, kan gruppering af afkrydsningsfelterne hjælpe med at kontrollere alle afkrydsningsfelter på én gang. Dette afsnit vil tale om, hvordan man grupperer flere afkrydsningsfelter i et Excel-regneark.

7.1 Grupper afkrydsningsfelter ved hjælp af gruppefunktionen

I Excel er gruppe funktion kan hjælpe med at gruppere flere afkrydsningsfelter, gør venligst som dette:

1. Hold Ctrl tast, og klik derefter for at markere afkrydsningsfelterne én efter én, som du vil gruppere, se skærmbillede:

2. Højreklik derefter og vælg gruppe > gruppe fra kontekstmenuen, se skærmbillede:

3. Og alle valgte afkrydsningsfelter er grupperet, du kan flytte, kopiere dem sammen på én gang.

---

7.2 Grupper afkrydsningsfelter ved hjælp af gruppebokskommando

Derudover kan du også bruge Gruppeboks at gruppere flere afkrydsningsfelter sammen. Gør venligst med følgende trin:

1. Gå til Udvikler fanebladet, og klik derefter på indsatte > Gruppeboks (formkontrol), se skærmbillede:

2. Træk derefter musen for at tegne en gruppeboks, og skift gruppeboksens billedtekstnavn som du vil:

3. Nu kan du indsætte afkrydsningsfelter i gruppeboksen, klik Udvikler > indsatte > Afkrydsningsfelt (formkontrol), se skærmbillede:

4. Træk derefter musen for at tegne et afkrydsningsfelt, og ændre billedtekstens navn efter behov, se skærmbilleder

5. På samme måde skal du indsætte andre afkrydsningsfelter i gruppeboksen, og du vil få resultatet som vist nedenfor skærmbillede:

---

Eksempler: Sådan bruger du afkrydsningsfelter i Excel

Fra ovenstående information kender vi en vis grundlæggende viden om afkrydsningsfelterne. I dette afsnit vil jeg introducere, hvordan du bruger afkrydsningsfelter til nogle interaktive og dynamiske operationer i Excel.

 Eksempel 1: Opret opgaveliste med afkrydsningsfelter

To do-listen er nyttig for os til at markere de opgaver, der er udført i vores daglige arbejde. I en typisk opgaveliste har de afkrydsede udførte opgaver et gennemstregningsformat som på nedenstående skærmbillede. Ved hjælp af afkrydsningsfelter kan du hurtigt oprette en interaktiv opgaveliste.

For at oprette en opgaveliste med afkrydsningsfelter skal du følge følgende trin:

1. Indsæt venligst afkrydsningsfelterne i listen over celler, hvor du vil bruge, se skærmbillede: (Klik for at vide, hvordan du indsætter flere afkrydsningsfelter)

2. Når du har indsat afkrydsningsfelterne, skal du knytte hvert afkrydsningsfelt til en separat celle.

3. Efter at have linket afkrydsningsfelter til celler, hvis afkrydsningsfeltet er markeret, vises et SAND, hvis det ikke er markeret, vises et FALSK, se skærmbillede:

4. Derefter skal du anvende Betinget formatering funktion for at opnå følgende handlinger. Vælg celleområdet A2:C8, som du vil oprette en opgaveliste, og klik derefter Home > Betinget formatering > Ny regel at gå til Ny formateringsregel dialog boks.

5. I Ny formateringsregel dialog, klik Brug en formel til at bestemme, hvilke celler der skal formateres i Vælg en regeltype i listen, og indtast derefter denne formel = C2 = SAND ind i Formater værdier, hvor denne formel er sand tekstboks, se skærmbillede:

Bemærk: C2 er en celle, der er knyttet til afkrydsningsfeltet..

6. Fortsæt derefter med at klikke på dannet knappen for at gå til formater celler dialog boks. Under font fanen skal du kontrollere Gennemstreget fra Effekter sektion, og angiv en farve for det færdige opgavelisteelement, som du ønsker, se skærmbillede:

7. Klik derefter på OK > OK for at lukke dialogerne, nu, når du markerer afkrydsningsfeltet, vil dets tilsvarende element blive formateret som gennemstreget som vist nedenfor:

---

 Eksempel 2: Opret dynamisk diagram med afkrydsningsfelter

Nogle gange kan det være nødvendigt at vise en masse data og information i ét diagram, og diagrammet vil være i rod. I dette tilfælde kan du bruge afkrydsningsfelterne til at oprette et dynamisk diagram i dit ark. Når du markerer et afkrydsningsfelt, vil den tilsvarende datalinje blive vist, hvis afkrydsningsfeltet fjernes, vil datalinjen blive skjult som vist nedenfor:

Dette afsnit vil tale om to hurtige tricks til at oprette denne type diagram i Excel.

 Opret interaktivt diagram med afkrydsningsfelter i Excel

Normalt kan du i Excel oprette et dynamisk diagram ved at bruge afkrydsningsfelter med følgende trin:

1. Indsæt nogle afkrydsningsfelter og omdøb dem. I dette tilfælde vil jeg indsætte tre afkrydsningsfelter og omdøbe dem til Apple, Orange og Peach, se skærmbillede:

2. Derefter skal du linke disse afkrydsningsfelter til celler, klik venligst for at markere det første afkrydsningsfelt, og højreklik derefter og vælg FormatkontrolI Format objekt under dialogboksen kontrol fanen fra Cellelink boks, vælg en celle, hvor du vil linke til afkrydsningsfeltet, se skærmbillede:

3. Gentag ovenstående trin for at knytte de to andre afkrydsningsfelter til andre celler. Nu, hvis du markerer afkrydsningsfeltet, vil en TRUE blive vist, ellers vil en FALSE blive vist som vist nedenfor:

4. Efter at have indsat og sammenkædet afkrydsningsfelterne, skal du nu forberede dataene. Kopier de originale datarække- og kolonneoverskrifter til et andet sted, se skærmbillede:

5. Anvend derefter nedenstående formler:

• I celle B13: = HVIS ($ B $ 6, B2, NA ()), og træk udfyldningshåndtaget for at udfylde rækken fra B13 til G13;
• I celle B14: = HVIS ($ B $ 7, B3, NA ()),og træk i udfyldningshåndtaget for at udfylde rækken fra B14 til G14;
• I celle B15: = HVIS ($ B $ 8, B4, NA ()),og træk i udfyldningshåndtaget for at udfylde rækken fra B15 til G15.
• Disse formler returnerer værdierne fra originale data, hvis afkrydsningsfeltet for det pågældende produkt er markeret, og #N/A, hvis det ikke er markeret. Se skærmbillede:

6. Vælg derefter det nye dataområde fra A12 til G15, og klik derefter indsatte > Indsæt linje- eller områdediagram > Line (linje) for at indsætte et linjediagram.

7. Nu, når du markerer produktafkrydsningsfeltet, vises dets datalinje, og når du fjerner markeringen, forsvinder den som vist nedenfor:

8. Når du har oprettet diagrammet, kan du placere afkrydsningsfelterne på diagrammet for at få dem til at se pæne ud. Klik for at vælge plotområdet, og træk derefter for at formindske det, se skærmbillede:

9. Og tryk derefter på Ctrl for at markere de tre afkrydsningsfelter, træk dem til diagrammet, og højreklik derefter for at vælge Tage den op foran > Tage den op foran, se skærmbillede:

10. Og afkrydsningsfelterne vises på kortet, fortsæt med at trykke Ctrl for at markere afkrydsningsfelterne og diagrammet én efter én, højreklik for at vælge gruppe > gruppe, se skærmbillede:

11. Nu er afkrydsningsfelterne forbundet med linjediagrammet. Når du flytter diagrammet, flyttes afkrydsningsfelterne også tilsvarende.

---

 Opret interaktivt diagram med afkrydsningsfelter med en nem funktion

Ovenstående metode kan være lidt vanskelig for dig, her vil jeg introducere en nem måde at løse denne opgave på. Med Kutools til Excel's Afkrydsningsfelt linjediagram funktion, kan du nemt oprette et dynamisk diagram med afkrydsningsfelter.

Efter installation Kutools til Excelskal du gøre som dette:

1. Vælg det dataområde, du vil oprette diagrammet, og klik derefter Kutools > Diagrammer > Kategori Sammenligning > Afkrydsningsfelt linjediagram, se skærmbillede:

2. Og så, a Afkrydsningsfelt linjediagram dialogboksen springes ud, de valgte data udfyldes automatisk i deres separate tekstbokse, se skærmbillede:

3. Klik derefter på OK knappen, og en promptboks vises for at minde dig om, at et skjult ark med nogle mellemliggende data vil blive oprettet, klik venligst Ja knap, se skærmbillede:

4. Og et linjediagram med afkrydsningsfelter vil blive oprettet med succes, se skærmbillede:

---

 Eksempel 3: Opret rulleliste med afkrydsningsfelter

At vælge flere elementer fra en rulleliste kan være en almindelig opgave for de fleste af os. Nogle brugere forsøger at oprette en rulleliste med afkrydsningsfelter for at vælge flere valg som vist nedenfor. Desværre er det ikke muligt at lave sådanne drop-down lister med afkrydsningsfelter i Excel. Men her vil jeg introducere to typer af valg af flere afkrydsningsfelter i Excel. Den ene er en liste med afkrydsningsfelter, og en anden er en rulleliste med afkrydsningsfelter.

 Opret en rulleliste med afkrydsningsfelter ved at bruge listeboksen

I stedet for en rulleliste kan du bruge en liste til at tilføje afkrydsningsfelter til flere valg. Processen er lidt kompliceret, følg venligst nedenstående trin trin for trin:

1. Indsæt først en listeboks, klik Udvikler > indsatte > Listeboks (ActiveX-kontrol). Se skærmbillede:

2. Træk musen for at tegne en liste, og højreklik på den, vælg Ejendomme fra kontekstmenuen, se skærmbillede:

3. I Ejendomme rude, skal du indstille handlingerne som følger:

• I ListFillRange boks, indtast det dataområde, du vil have vist i listeboksen;
• I Listestil boks, vælg 1 - fmList StyleOption fra rullemenuen
• I MultiSelect boks, vælg 1 - fmMultiSelectMulti fra rullemenuen
• Til sidst skal du klikke på knappen Luk for at lukke den.

4. Klik derefter på en celle, hvor du vil udskrive de flere valgte elementer, og giv den et områdenavn. Indtast venligst et områdenavn "Outputemne" ind i Navneboks og tryk Indtast nøgle, se skærmbillede:

5. Klik derefter på indsatte > Former > Rektangel, træk med musen for at tegne et rektangel over listeboksen, se skærmbillede:

6. Højreklik derefter på rektanglet og vælg Tildel makro fra genvejsmenuen. Se skærmbillede:

7. I Tildel makro dialog, klik Ny knap, se skærmbillede:

8. I åbningen Microsoft Visual Basic til applikationer vindue, skal du erstatte den originale kode i modulvinduet med nedenstående VBA-kode:

Sub Rectangle1_Click()
'Updated by Extendoffice
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("Outputitem").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("Outputitem") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("Outputitem") = ""
    End If
End If
End Sub

Bemærk: I ovenstående kode, Rektangel1 er formens navn, ListBox1 er navnet på listeboksen, og Outputemne er outputnavnet for outputcellen. Du kan ændre dem ud fra dine behov.

9. Luk derefter kodevinduet. Klik nu på rektangelknappen for at skjule eller vise listeboksen. Når listeboksen vises, skal du vælge elementerne i listeboksen og klikke på rektangelknappen igen for at udskrive de valgte elementer i den angivne celle, se nedenstående demo:

---

 Opret en rulleliste med afkrydsningsfelter med en fantastisk funktion

For at tilføje afkrydsningsfelterne i den rigtige rulleliste kan du bruge et kraftfuldt værktøj – Kutools til Excel, Med Rulleliste med afkrydsningsfelter funktion, kan du hurtigt og nemt oprette rullelister med flere afkrydsningsfelter.

Efter installation Kutools til Excelskal du gøre som dette:

1. Først skal du indsætte den normale rulleliste i de valgte celler, se skærmbillede:

2. Klik derefter på Kutools > Rulleliste > Rulleliste med afkrydsningsfelter > Indstillinger. Se skærmbillede:

3. I Rulleliste med indstillinger for afkrydsningsfelter dialogboksen, skal du konfigurere som følger.

• I Anvend på sektion, skal du angive det anvendelige omfang, hvor du vil oprette afkrydsningsfelter for rullelistens celler. Du kan angive et bestemt område, aktuelt regneark, aktuel projektmappe eller alle åbnede projektmapper baseret på dine behov;
• I tilstand sektion, skal du vælge Ændre mulighed;
• I Separator boks, skriv et skilletegn for at adskille de valgte elementer;
• I Text Retning sektion, vælg tekstretningen baseret på dine behov;
• Endelig skal du klikke på OK .

4. Når du er færdig med indstillingerne, skal du klikke på Kutools > Rulleliste > Rulleliste med afkrydsningsfelter > Aktivér rulleliste med afkrydsningsfelter for at aktivere denne funktion. Se skærmbillede:

5. Fra nu af, når du klikker på en celle med en rulleliste, vil en liste med afkrydsningsfelter dukke op, og vælg derefter elementerne ved at markere afkrydsningsfelterne for at udskrive elementerne i cellen som nedenstående demo vist:

Klik for at få mere detaljerede oplysninger om denne funktion...

---

 Eksempel 4: Marker afkrydsningsfeltet for at ændre rækkefarve

Har du nogensinde prøvet at ændre rækkefarven baseret på det afkrydsede afkrydsningsfelt? Hvilket betyder, at farven på den relaterede række vil blive ændret, hvis du markerer et afkrydsningsfelt som vist nedenfor skærmbilledet, dette afsnit vil tale om nogle tricks til at løse denne opgave i Excel.

 Marker afkrydsningsfeltet for at ændre cellefarve ved hjælp af betinget formatering

For at ændre rækkefarven ved at markere eller fjerne markeringen i afkrydsningsfeltet, Betinget formatering funktion i Excel kan gøre dig en tjeneste. Gør venligst som dette:

1. Indsæt først afkrydsningsfelterne i listen over celler, som du har brug for, se skærmbillede:

2. Dernæst skal du linke disse afkrydsningsfelter til cellerne ved siden af ​​hvert afkrydsningsfelt separat, se skærmbillede:

3. Vælg derefter det dataområde, som du vil ændre rækkefarve, og klik derefter Home > Betinget formatering > Ny regel, se skærmbillede:

4. I Ny formateringsregel dialogboksen, skal du udføre nedenstående handlinger:

• Vælg Brug en formel til at bestemme, hvilke celler der skal formateres valgmulighed i Vælg en regeltype boks;
• Indtast denne formel =HVIS($F2=SAND,SAND,FALSK) ind i Formater værdier, hvor denne formel er sand boks;
• Klik på knappen dannet knappen for at angive en farve, du kan lide for rækkerne.

Bemærk: I formlen 2 $ er den første linkede celle i afkrydsningsfeltet..

5. Når du har valgt farve, skal du klikke OK > OK for at lukke dialogboksene, og nu, når du markerer et afkrydsningsfelt, vil den tilsvarende række automatisk blive fremhævet som nedenstående demo vist:

---

  Marker afkrydsningsfeltet for at ændre rækkefarve ved at bruge VBA-kode

Følgende VBA-kode kan også hjælpe dig med at ændre rækkefarven baseret på det afkrydsede afkrydsningsfelt, gør venligst med nedenstående kode:

1. I regnearket, du vil fremhæve rækker ved afkrydsningsfelter, skal du højreklikke på arkfanen og vælge Vis kode fra højreklikmenuen. Se skærmbillede:

2. Kopiér og indsæt nedenstående kode i den åbnede Microsoft Visual Basic til applikationer vindue:

VBA-kode: Fremhæv rækker ved at markere afkrydsningsfeltet

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 = "Sheet2.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

Bemærk: I ovenstående kode, i dette script xChk.OnAction = "Ark2.IndsætBgColor", du bør ændre arknavnet-Sheet2 til din egen (Sheet2 er det rigtige navn på regnearket, kan du få det fra venstre kodevindue). Se skærmbillede:

3. Sæt derefter markøren i den første del af koden, og tryk på F5 nøgle for at køre koden. I pop op Kutools til Excel dialogboks, vælg venligst det område, du vil indsætte afkrydsningsfelter, se skærmbillede:

4. Klik derefter på OK knappen, indsættes afkrydsningsfelterne i de valgte celler som vist nedenfor skærmbillede:

5. Fra nu af, hvis du markerer et afkrydsningsfelt, vil den relative række automatisk blive farvet som vist nedenfor skærmbillede:

---

 Eksempel 5: Tæl eller sum celleværdier, hvis afkrydsningsfeltet er markeret

Hvis du har en række data med en liste over afkrydsningsfelter, vil du nu gerne tælle antallet af afkrydsede afkrydsningsfelter eller summere de tilsvarende værdier baseret på de afkrydsede afkrydsningsfelter som vist nedenfor. Hvordan kunne du løse denne opgave i Excel?

For at løse denne opgave er det vigtige trin at linke afkrydsningsfelterne til relative celler ved siden af ​​dataene. Det afkrydsede afkrydsningsfelt vil vise SAND i den sammenkædede celle, ellers vil en FALSK blive vist, og derefter kan du bruge tælle- eller sumfunktionen til at få resultatet baseret på SAND eller FALSK værdi.

1. Først bør du linke afkrydsningsfelterne til celler separat, hvis afkrydsningsfeltet er markeret, vises et SAND, hvis det ikke er markeret, vises et FALSK, se skærmbillede:

2. Anvend derefter følgende formler til at tælle eller summere værdierne baseret på de afkrydsede afkrydsningsfelter:

Tæl værdier ved at afkrydse afkrydsningsfelter:

= ANTALHVIS (D2: D10, SAND)

Bemærk: I denne formel D2: D10 er rækkevidden af ​​linkcellerne, som du har indstillet til afkrydsningsfelterne.

Sum værdier ved afkrydsede afkrydsningsfelter:

= SUMPRODUCT (($ D $ 2: $ D $ 10 = SAND) * $ C $ 2: $ C $ 10)

Bemærk: I denne formel D2: D10 er området for de linkceller, du har indstillet til afkrydsningsfelterne, og C2: C10 er listen over celler, du vil summere.

---

 Eksempel 6: Hvis afkrydsningsfeltet er markeret, så returner en bestemt værdi

Hvis du har et afkrydsningsfelt, når du markerer det, skal en bestemt værdi vises i en celle, og når du fjerner markeringen, vises en tom celle som vist nedenfor:

For at afslutte dette job skal du gøre følgende:

1. Først skal du knytte dette afkrydsningsfelt til en celle. Højreklik på afkrydsningsfeltet, og vælg Formatkontrol, i poppet ud Format objekt under dialogboksen kontrol fanen, skal du klikke for at vælge en celle, hvor du vil linke med afkrydsningsfeltet fra Cellelink boks, se skærmbillede:

2. Klik derefter på OK knappen for at lukke dialogboksen. Indtast nu denne formel: =HVIS(A5=SAND,"Extendoffice","") ind i en celle, hvor du vil udskrive resultatet, og tryk derefter på Indtast nøgle.

Bemærk: I denne formel A5 er den celle, der linkede til afkrydsningsfeltet, "Extendoffice” er den specifikke tekst, du kan ændre dem til dit behov.

3. Nu, når du markerer afkrydsningsfeltet, vil den specifikke tekst blive vist, når du fjerner markeringen, vises en tom celle, se nedenstående demo: