Hur infogar jag snabbt flera kryssrutor i Excel?

Hur kan vi snabbt infoga flera kryssrutor i Excel? Följ dessa knepiga metoder i Excel:

Infoga flera kryssrutor med Fill Handle

Infoga flera kryssrutor med VBA-kod

Infoga och ta bort flera kryssrutor med ett klick genom att använda Kutools för Excel

Infoga flera kryssrutor med Fill Handle

I Excel är Fill Handle en kraftfull funktion för att göra många saker. Den kan också fylla i kryssrutorna. Först måste du infoga en kryssruta. Gör enligt följande:

1. Klicka Utvecklare i menyraden och klicka sedan på Insertoch välj kryssrutans bild under Formkontroll. Se skärmdump:

2. Klicka på kryssrutans bild så visas plusteckenpekaren, klicka där du vill lägga till kryssrutan.

3. Markera kryssrutan och flytta den till en cell och radera sedan kryssrutans namn.

4. Markera sedan cellen där kryssrutan finns. Dra sedan fyllningshandtaget över det cellområde som du vill fylla. Se skärmdump:

Infoga flera kryssrutor med VBA-kod

Om du tycker att den första metoden är något besvärlig kan följande VBA-kod hjälpa dig att enkelt och snabbt infoga flera kryssrutor.

1. Klicka Utvecklare > Visual Basic, en ny Microsoft Visual Basic för applikationer fönstret visas, klicka Insert > Modulernaoch mata in följande kod i Modulerna:

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. Klicka sedan för att köra koden. Och en snabbruta dyker upp för att påminna dig om att välja ett cellområde som du vill infoga kryssrutorna. Se skärmdump:

3. Och klicka sedan på OK, kryssrutorna har satts in i området snyggt och vackert. Se skärmdump:

Infoga flera kryssrutor med Kutools för Excel

Här kan jag presentera dig för ett enkelt och praktiskt sätt att infoga flera kryssrutor-Kutools för Excel, med dess Kryssruta för batchinsats kan du infoga kryssrutorna i tomma celler eller celler med data.

När du har installerat Kutools för Excel, gör med följande steg:

1. Markera ett cellområde som du vill infoga kryssrutorna.

2. Klicka Kutools > Insert > Kryssrutor för satsinsats, se skärmdump:

3. Då har dina valda celler fyllts med kryssrutorna enligt följande skärmdumpar:

Infoga kryssrutor i tomma celler	Infoga kryssrutor i dataceller

Infoga och ta bort flera kryssrutor med Kutools för Excel

Relaterade Artikel:

Hur tar jag snabbt bort flera kryssrutor i Excel?

---

De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

• återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
• Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
• Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
• Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
• Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
• Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
• Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
• Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
• Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.

Läs mer... Gratis nedladdning... Köp... 

---

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

• Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
• Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
• Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!

Läs mer... Gratis nedladdning... Köp...