Hoppa till huvudinnehåll

Hur skapar jag rullgardinslista med flera kryssrutor i Excel?

Författare: Siluvia Senast ändrad: 2024-12-12

Traditionella rullgardinslistor i Excel begränsar användare till enstaka val. För att övervinna denna begränsning och möjliggöra flera val kommer vi att utforska två praktiska metoder för att skapa rullgardinslistor med flera kryssrutor.

Använd listrutan för att skapa en listruta med flera kryssrutor
A: Skapa en listruta med källdata
B: Namnge cellen där du hittar de valda objekten
C: Infoga en form som hjälper till att mata ut de valda objekten
Skapa enkelt listrutan med kryssrutor med ett fantastiskt verktyg
Fler handledning för rullgardinsmenyn ...


Använd listrutan för att skapa en listruta med flera kryssrutor

Som visas i skärmdumpen nedan kommer alla namn i intervallet A2:A11 i det aktuella kalkylbladet att fungera som källdata för listrutan som finns i cell C4. Genom att klicka på den här rutan utökas listan över objekt du kan välja och de valda objekten kommer att visas i cell E4. För att uppnå detta, följ dessa steg:

En skärmdump som visar källdataintervallet för en listruta med flera kryssrutor i Excel

A. Skapa en listruta med källdata

1. klick Utvecklare > Insert > Listbox (Active X Control). Se skärmdump:

En skärmdump av att välja alternativet Listbox under fliken Utvecklare i Excel

2. Rita en listruta i det aktuella kalkylbladet, högerklicka på den och välj sedan Våra Bostäder från högerklickmenyn.

En skärmdump av alternativet Egenskaper i listrutans snabbmeny

3. I Våra Bostäder i dialogrutan måste du konfigurera enligt följande.

  • 3.1 I ListFillRange rutan, ange källområdet du kommer att visa i listan (här anger jag intervall A2: A11);
  • 3.2 I Liststil rutan, välj 1 - fmList StyleOption;
  • 3.3 I Flera val rutan, välj 1 - fmMultiSelectMulti;
  • 3.4 Stäng Våra Bostäder dialog ruta. Se skärmdump:

    En skärmdump av den konfigurerade dialogrutan Egenskaper för en listruta i Excel

B: Namnge cellen där du hittar de valda objekten

Om du behöver mata ut alla markerade objekt till en angiven cell som E4, gör så här.

1. Välj cellen E4, ange ListBoxOutput i Namn Box och tryck på ange nyckel.

En skärmdump som visar hur man namnger en cell för att lokalisera valda objekt i Excel

C. Infoga en form som hjälper till att mata ut de markerade objekten

1. klick Insert > Former > Rektangel. Se skärmdump:

En skärmdump som visar hur man infogar en rektangelform i Excel

2. Rita en rektangel i ditt kalkylblad (här ritar jag rektangeln i cell C4). Högerklicka sedan på rektangeln och välj Tilldela makro från högerklickmenyn.

En skärmdump av att tilldela ett makro till en rektangelform i Excel

3. I Tilldela makro dialogrutan, klicka på Nya knapp.

En skärmdump av dialogrutan Tilldela makro i Excel

4. I öppningen Microsoft Visual Basic för applikationer fönstret, byt ut den ursprungliga koden i Modulerna fönster med VBA-koden nedan.

VBA-kod: Skapa en lista med flera kryssrutor

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

Notera: I koden, Rektangel1 är formnamnet; ListBox1 är namnet på listrutan; Alternativ och Pickupalternativ är de visade texterna av formen; och den ListBoxOutput är utdatacellens intervallnamn. Du kan ändra dem baserat på dina behov.

5. Tryck andra + Q samtidigt för att stänga Microsoft Visual Basic för applikationer fönster.

6. Genom att klicka på rektangelknappen viks eller utökas listrutan. När listrutan expanderas väljer du önskade objekt genom att markera dem. Klicka sedan på rektangeln igen för att mata ut alla markerade objekt i cell E4. Se demon nedan:

7. Och spara sedan arbetsboken som en Excel Makroaktivera arbetsbok för att återanvända koden i framtiden.


Skapa rullgardinsmeny med kryssrutor med ett fantastiskt verktyg

Trött på den komplexa VBA-kodningen? Kutools för Excel gör det enkelt att skapa rullgardinslistor med kryssrutor för sömlöst flerval. Perfekt för undersökningar, datafiltrering eller dynamiska formulär, detta användarvänliga verktyg effektiviserar ditt arbetsflöde och sparar tid.

Kutools för Excel erbjuder över 300 avancerade funktioner för att effektivisera komplexa uppgifter, vilket ökar kreativiteten och effektiviteten. Förbättrad med AI-funktioner, Kutools automatiserar uppgifter med precision, vilket gör datahantering enkel. Detaljerad information om Kutools för Excel...         Gratis provperiod...

1. Öppna kalkylbladet som du har ställt in listrutan för datavalidering, klicka på Kutools > Listrutan > Aktivera avancerad rullgardinslista. Klicka sedan  Listruta med kryssrutor från Listrutan igen. Se skärmdump:

klicka för att aktivera Avancerad rullgardinslista pil till höger klicka på rullgardinsmenyn med kryssrutor

2. I Lägg till Kryssrutor till rullgardinsmenyn dialogrutan, konfigurera så här.

  • 2.1) Välj cellerna som innehåller rullgardinsmenyn;
  • 2.2) I Separator rutan, ange en avgränsare som du kommer att använda för att separera flera objekt;
  • 2.3) Markera Aktivera sökning alternativ som du behöver. (Om du markerar det här alternativet kan du göra en sökbar i rullgardinsmenyn senare.)
  • 2.4) Klicka på OK knapp.

    klicka på rullgardinsmenyn med kryssrutor

Från och med nu, när du klickar på cellen med rullgardinslistan, kommer en listruta att dyka upp. Välj objekt genom att markera kryssrutorna för att mata ut i cellen som nedanstående demo visas.

För mer information om den här funktionen, vänligen besök denna handledning.

Kutools för Excel - Superladda Excel med över 300 viktiga verktyg. Njut av permanent gratis AI-funktioner! Hämta den nu

Den här artikeln innehåller två metoder som hjälper dig att enkelt skapa rullgardinslistor med kryssrutor i Excel. Du kan välja den du föredrar. Om du är intresserad av att utforska fler Excel-tips och tricks, vår webbplats erbjuder tusentals tutorials.


Relaterade artiklar:

Autoslutför när du skriver i Excel-rullgardinsmenyn
Om du har en rullgardinsmeny för datavalidering med stora värden måste du bläddra nedåt i listan bara för att hitta rätt eller skriva hela ordet direkt i listrutan. Om det finns en metod för att automatiskt slutföra när du skriver den första bokstaven i rullgardinsmenyn blir allt enklare. Denna handledning ger metoden för att lösa problemet.

Skapa rullgardinslista från en annan arbetsbok i Excel
Det är ganska enkelt att skapa en rullgardinslista för datavalidering bland kalkylblad i en arbetsbok. Men om listdata du behöver för datavalideringen hittar du i en annan arbetsbok, vad skulle du göra? I den här guiden lär du dig hur du skapar en drop-down-lista från en annan arbetsbok i Excel i detalj.

Skapa en sökbar rullgardinslista i Excel
För en rullgardinsmeny med många värden är det inte lätt att hitta en riktig. Tidigare har vi introducerat en metod för automatisk komplettering av rullgardinsmenyn när du anger den första bokstaven i rullgardinsmenyn. Förutom funktionen för autoslutförande kan du också göra listrutan sökbar för att förbättra arbetseffektiviteten för att hitta rätt värden i listrutan. För att göra rullgardinsmenyn sökbar, prova metoden i den här självstudien.

Fyll i andra celler automatiskt när du väljer värden i Excel-listrutan
Låt oss säga att du har skapat en rullgardinslista baserat på värdena i cellområdet B8: B14. När du väljer något värde i listrutan vill du att motsvarande värden i cellintervall C8: C14 fylls automatiskt i en vald cell. För att lösa problemet kommer metoderna i denna handledning att göra dig en tjänst.

Fler handledning för rullgardinsmenyn ...

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...


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!