Note: The other languages of the website are Google-translated. Back to English

Hvordan indsættes der hurtigt flere afkrydsningsfelter i Excel?

Hvordan kan vi hurtigt indsætte flere afkrydsningsfelter i Excel? Følg disse vanskelige metoder i Excel:

Indsæt flere afkrydsningsfelter med Fill Handle

Indsæt flere afkrydsningsfelter med VBA-kode

Indsæt og slet flere afkrydsningsfelter med et enkelt klik ved hjælp af Kutools til Excel


pil blå højre boble Indsæt flere afkrydsningsfelter med Fill Handle

I Excel er Fill Handle en stærk funktion til at gøre mange ting. Det kan også udfylde afkrydsningsfelterne. Først skal du indsætte et afkrydsningsfelt. Gør som følger:

1. Klik Udvikler i menulinjen, og klik derefter på indsatte, og vælg afkrydsningsfeltets billede under Formkontrol. Se skærmbillede:

doc-insert-multiple-afkrydsningsfelter1

2. Klik på afkrydsningsfeltets billede, og du vil se plustegnmarkøren, klik hvor du vil tilføje afkrydsningsfeltet.

doc-insert-multiple-afkrydsningsfelter2

3. Marker afkrydsningsfeltet, flyt det til en celle, og slet derefter navnet på afkrydsningsfeltet.

4. Marker derefter den celle, hvor afkrydsningsfeltet forbliver. Træk derefter fyldhåndtaget over det celleområde, du vil udfylde. Se skærmbillede:

doc-insert-multiple-afkrydsningsfelter3


Indsæt flere afkrydsningsfelter i markeringer med et enkelt klik:

Kutools til Excel's Batchindsats afkrydsningsfelter hjælpeprogram kan hjælpe dig med hurtigt at indsætte flere afkrydsningsfelter på én gang. Klik for at downloade denne funktion gratis.

doc indsæt flere afkrydsningsfelter 10

Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!


pil blå højre boble Indsæt flere afkrydsningsfelter med VBA-kode

Hvis du synes, at den første metode er noget besværlig, kan følgende VBA-kode hjælpe dig med let og hurtigt at indsætte flere afkrydsningsfelter.

1. Klik Udvikler > Visual Basic, En ny Microsoft Visual Basic til applikationer vindue vises, skal du klikke indsatte > Moduler, og indtast følgende kode i Moduler:

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 derefter på doc-multiplicere-beregning-3 knappen for at køre koden. Og der vises et promptfelt for at minde dig om at vælge et celleområde, som du vil indsætte afkrydsningsfelterne. Se skærmbillede:

doc-insert-multiple-afkrydsningsfelter4

3. Og klik derefter på OK, afkrydsningsfelterne er indsat i området pænt og smukt. Se skærmbillede:

doc-insert-multiple-afkrydsningsfelter5


pil blå højre boble Indsæt flere afkrydsningsfelter med Kutools til Excel

Her kan jeg introducere dig til en nem og praktisk måde at indsætte flere afkrydsningsfelter på -Kutools til Excel, Med Batchindsats afkrydsningsfelt funktion, kan du indsætte afkrydsningsfelterne i tomme celler eller celler med data.

Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage.

Efter installation Kutools til Excelskal du gøre med følgende trin:

1. Vælg et celleområde, som du vil indsætte afkrydsningsfelterne.

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

doc-insert-multiple-afkrydsningsfelter06

3. Derefter er dine valgte celler udfyldt med afkrydsningsfelterne som følgende skærmbilleder vist:

Indsæt afkrydsningsfelter i tomme celler Indsæt afkrydsningsfelter i dataceller
doc-insert-multiple-afkrydsningsfelter7 doc-insert-multiple-afkrydsningsfelter8

Tips. Hvis du hurtigt vil slette flere afkrydsningsfelter, skal du prøve at bruge Kutools til Excel's Slet afkrydsningsfelter som vist i det følgende skærmbillede. Det er fuld funktion uden begrænsning på 60 dage, download venligst og få en gratis prøveperiode nu.

doc-insert-multiple-afkrydsningsfelter9

Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!


pil blå højre boble Indsæt og slet flere afkrydsningsfelter med Kutools til Excel

Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!

Relateret artikel:

Hvordan slettes hurtigt flere afkrydsningsfelter i Excel?


De bedste Office-produktivitetsværktøjer

Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%

  • Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2021 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60 dages pengene tilbage garanti.
kte-fane 201905

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
officetab bund
Sorter kommentarer efter
Kommentarer (51)
Ingen vurderinger endnu. Vær den første til at bedømme!
Denne kommentar blev minimeret af moderatoren på webstedet
Fremragende makro, der fungerer smukt til hurtigt og nemt at indsætte afkrydsningsfelter i et udvalgt område; tak skal du have. Kunne du tænke dig at vise et eksempel på en makro til at indsætte en tilpasset rulleliste i et valgt område med tre muligheder: "Ja", "Nej" og "Måske"?
Denne kommentar blev minimeret af moderatoren på webstedet
Fantastisk trick... Jeg nød det.
Denne kommentar blev minimeret af moderatoren på webstedet
Hvorfor er der kun én dreng i denne klasse????
Denne kommentar blev minimeret af moderatoren på webstedet
[quote]Hvorfor er der kun én dreng i denne klasse????Af Daniel[/quote] :lol: Det er kun til demonstration.
Denne kommentar blev minimeret af moderatoren på webstedet
fremragende makro fungerer tilføj afkrydsningsfelt i cellen, tak :-)
Denne kommentar blev minimeret af moderatoren på webstedet
Fremragende arbejde. Tak skal du have :roll:
Denne kommentar blev minimeret af moderatoren på webstedet
FANTASTISK! Mange tak!
Denne kommentar blev minimeret af moderatoren på webstedet
Da jeg gjorde dette, fungerede alt godt (tak!), undtagen når boksene er markeret, har den automatisk en gul fyldfarve i cellen. Hvordan kommer jeg derhen, hvor det eneste, der sker, er, at boksen er markeret, ingen fyldfarve? Tak!
Denne kommentar blev minimeret af moderatoren på webstedet
[quote]Da jeg gjorde dette, fungerede alt godt (tak!), undtagen når boksene er markeret, har det automatisk en gul fyldfarve i cellen. Hvordan kommer jeg derhen, hvor det eneste, der sker, er, at boksen er markeret, ingen fyldfarve? Tak!Af # Sean[/quote] Du skal bare ændre linjen, som der står i kommentarerne: .FormatConditions(1).Interior.ColorIndex = 6 'skift til anden farve, når afkrydset Udelad den helt, hvis du ikke ønsker en farveændring. Skål!
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg gjorde det, men når jeg tjekker en boc, bliver alle tjekket sammen. hvordan kan jeg skille dem ad?
Denne kommentar blev minimeret af moderatoren på webstedet
Koden fungerer fantastisk! Jeg redigerer farven nu, jeg vil gerne centrere afkrydsningsfelterne i hver celle, nogen ide om, hvad jeg skal ændre til det? Tak!
Denne kommentar blev minimeret af moderatoren på webstedet
[quote]Koden fungerer godt! Jeg redigerer farven nu, jeg vil gerne centrere afkrydsningsfelterne i hver celle, nogen ide om, hvad jeg skal ændre til det? Tak!Af Violet[/quote] For hver Rng I WorkRng With Ws.CheckBoxes.Add((Rng.Offset(0, 1).Left - Rng.Left) / 2 + Rng.Left - CkBoxSize, Rng.Top, 0.33, Rng.Height ) .Characters.Text = Rng.Value End With
Denne kommentar blev minimeret af moderatoren på webstedet
Det bliver ved med at give mig en fejl, når jeg åbner det, at det skulle rette fejl? Nogen hjælp? Hvis nogen vil hjælpe, vil jeg sende rapporten, som jeg får fra Microsoft office.
Denne kommentar blev minimeret af moderatoren på webstedet
Afkrydsningsfelterne bliver lidt skøre, når du kopierer dem med deres sammenkædede celler. Jeg var nødt til at skrive en ting for at nulstille linket, når jeg vil kopiere disse celler et andet sted.
Denne kommentar blev minimeret af moderatoren på webstedet
Kan vi så filtrere på disse afkrydsningsfelter? I princippet kun vise dem, der deltog?
Denne kommentar blev minimeret af moderatoren på webstedet
Kan vi så filtrere disse afkrydsningsfelter? I princippet kun vise dem, der deltog?
Denne kommentar blev minimeret af moderatoren på webstedet
Ja helt. Afkrydsningsfelterne er faktisk uafhængige af cellerne. De svæver dybest set over regnearket og er knyttet til en celle ved adresse, der indsætter True og False-værdier, når der klikkes på dem (eller N/A, hvis du gør det til et afkrydsningsfelt med tre tilstande). Men når du filtrerer i Excel, skjuler det specifikke rækker. Det vil ikke skjule afkrydsningsfelterne. Jeg foreslår virkelig ikke at filtrere med denne makro. Mærkelige ting vil ske, og du er måske ikke klar over, når der er flere afkrydsningsfelter oven på hinanden, eller at to afkrydsningsfelter er knyttet til én celle, og en celle er knyttet til ingen afkrydsningsfelter. Det, jeg plejer at gøre, er, at jeg opretter en liste, og i stedet for flueben skriver jeg et 1 eller et 0 i den tilstødende celle og derefter total. Du kan endda pivottabellen, hvis dine oplysninger bliver komplicerede. Lad os f.eks. sige, at du havde en anden kolonne, der havde dine deltageres køn. Du kunne regne ud, hvor mange mænd og hvor mange kvinder der deltog.
Denne kommentar blev minimeret af moderatoren på webstedet
Mange tak!, for afkrydsningsfeltet.
Denne kommentar blev minimeret af moderatoren på webstedet
Er der en måde at få afkrydsningsfeltets tekst til at være teksten i den valgte celle?
Denne kommentar blev minimeret af moderatoren på webstedet
Ja. Ja der er. Der er altid en vej.
Denne kommentar blev minimeret af moderatoren på webstedet
[quote]Ja. Ja der er. Der er altid en vej.Af Danny[/quote] OK. Hvordan ville jeg opnå dette. Jeg er ikke velbevandret i excel-syntaks. Jeg har prøvet .text og .value (for c i ovenstående kode). Med forkerte resultater. Jeg har prøvet et utal af ting, der normalt ville være resultatet, men uden held. Det, jeg har, er en stor punktliste over elementer, som jeg gerne vil erstatte punktopstillingen med et afkrydsningsfelt og have værdien og teksten i det felt til at være den originale tekst af punktopstillingen
Denne kommentar blev minimeret af moderatoren på webstedet
Hej gutter, det er så nyttigt - tak! Hurtigt spørgsmål, jeg er fuldstændig uerfaren med denne type ting, så undskyld hvis det er dumt! Jeg vil gerne bare have afkrydsningsfelter (uden sandt eller falsk), og jeg vil gerne have, at felterne er gule, når de ikke er afkrydset, men ikke har udfyldning, når de først er afkrydset, for at angive elever, der ikke har afleveret kladder og vurdering osv. Er dette muligt? Kan nogen venligst poste den faktiske kode for dette, eller lede mig igennem det? På forhånd mange tak!!!
Denne kommentar blev minimeret af moderatoren på webstedet
hvordan man ændrer referenceadressen for flere afkrydsningsfelter
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg har et excel-regneark, der har et spørgsmål og så til højre er andre kolonner "Kontroller Met, kolonne f og G med afkrydsningsfelter, der er markeret, kolonne F ja eller kolonne G nr. Jeg vil kun bruge filteret til at få hver af rullerne har et flueben, men filteret kan ikke se fluebenet
Denne kommentar blev minimeret af moderatoren på webstedet
hvordan man ændrer mobiladresse
Denne kommentar blev minimeret af moderatoren på webstedet
Sub RelinkCheckBoxes() 'Du vælger celler, der indeholder de afkrydsningsfelter, der opfører sig mærkeligt. 'Så kører du makroen. 'Det ændrer disse afkrydsningsfelter, så de sammenkædede celler svarer til cellerne nedenunder. 'Det får også afkrydsningsfeltets tekst til at blive til celleteksten. Dim ckbox As Shape Dim rngLinkedCell As Range If ActiveSheet.CheckBoxes.Count = 0 Så Afslut Sub 'Test at markeringen er et område. Hvis TypeName(Selection) "Range" Then Exit Sub For Every ckbox In ActiveSheet.Shapes 'Test at formen er en kontrol. Hvis ckbox.Type = msoFormControl Så 'test at kontrollen er et afkrydsningsfelt Hvis ckbox.FormControlType = xlCheckBox Find derefter cellen under afkrydsningsfeltet, der er inden for valget Indstil rngLinkedCell = Application.Intersect(ckbox.TopLeftCell, Selection) 'tildel en ny linkadresse og omdøb afkrydsningsfeltet for at matche. Hvis ikke rngLinkedCell er intet så med ckbox .OLEFormat.Object.LinkedCell = rngLinkedCell.Address .Name = rngLinkedCell.Address .TextFrame.Characters.Text = rngLinkedCell.Text End With End If End If End If Next
Denne kommentar blev minimeret af moderatoren på webstedet
Koden fungerede godt. Tak skal du have!
Der er endnu ingen kommentarer her
Load More
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder

Følg os

Copyright © 2009 - www.extendoffice.com. | Alle rettigheder forbeholdes. Drevet af ExtendOffice. | | Sitemap
Microsoft og Office-logoet er varemærker eller registrerede varemærker tilhørende Microsoft Corporation i USA og / eller andre lande.
Beskyttet af Sectigo SSL