Cum se creează o listă derulantă cu mai multe casete de selectare în Excel?
Mulți utilizatori Excel tind să creeze o listă derulantă cu mai multe casete de selectare pentru a selecta mai multe articole din listă de fiecare dată. De fapt, nu puteți crea o listă cu mai multe casete de selectare cu validare date. În acest tutorial, vă vom arăta două metode pentru a crea o listă derulantă cu mai multe casete de selectare în Excel.
Utilizați Casetă listă pentru a crea o listă verticală cu mai multe casete de selectare
R: Creați o casetă listă cu date sursă
B: Denumiți celula în care veți localiza elementele selectate
C: Introduceți o formă pentru a ajuta la afișarea elementelor selectate
Creați cu ușurință o listă verticală cu casete de selectare cu un instrument uimitor
Mai multe tutoriale pentru lista derulantă ...
Utilizați Casetă listă pentru a crea o listă verticală cu mai multe casete de selectare
După cum se arată mai jos, în foaia de lucru curentă, toate numele din intervalul A2: A11 vor fi datele sursă ale listei. Faceți clic pe butonul din celula C4 pentru a afișa elementele selectate, iar toate elementele selectate în caseta de listă vor fi afișate în celula E4. Pentru a realiza acest lucru, vă rugăm să faceți următoarele.
A. Creați o casetă listă cu date sursă
1. clic Dezvoltator > Insera > Casetă listă (Active X Control). Vedeți captura de ecran:
2. Desenați o casetă listă în foaia de lucru curentă, faceți clic dreapta pe ea și apoi selectați Proprietăţi din meniul cu clic dreapta.
3. În Proprietăţi casetă de dialog, trebuie să configurați după cum urmează.
- 3.1 În ListFillRange , introduceți intervalul sursă pe care îl veți afișa în listă (aici introduc intervalul A2: A11);
- 3.2 În ListStyle selectați 1 - fmList StyleOption;
- 3.3 În Selectare multipla selectați 1 - fmMultiSelectMulti;
- 3.4 Închideți Proprietăţi căsuță de dialog. Vedeți captura de ecran:
B: Denumiți celula în care veți localiza elementele selectate
Dacă trebuie să trimiteți toate elementele selectate într-o celulă specificată, cum ar fi E4, vă rugăm să procedați după cum urmează.
1. Selectați celula E4, introduceți ListBoxOutput în Cutie de nume și apăsați tasta Intrați cheie.
C. Introduceți o formă pentru a ajuta la afișarea elementelor selectate
1. clic Insera > Forme > Dreptunghi. Vedeți captura de ecran:
2. Desenați un dreptunghi în foaia de lucru (aici desenez dreptunghiul din celula C4). Apoi faceți clic dreapta pe dreptunghi și selectați Atribuiți macro din meniul cu clic dreapta.
3. În Atribuiți macro , faceți clic pe Nou butonul.
4. În deschidere Microsoft Visual Basic pentru aplicații fereastra, înlocuiți codul original din Module fereastra cu codul VBA de mai jos.
Cod VBA: creați o listă cu mai multe casete de selectare
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
Notă: În cod, Dreptunghi1 este numele formei; ListBox1 este numele casetei de listă; Selectati optiunile și Opțiuni de preluare sunt textele afișate ale formei; si ListBoxOutput este numele intervalului celulei de ieșire. Le puteți schimba în funcție de nevoile dvs.
5. presa Alt + Q tastele simultan pentru a închide Microsoft Visual Basic pentru aplicații fereastră.
6. Faceți clic pe butonul dreptunghiular va plia sau extinde caseta listă. Când caseta de listă se extinde, bifând articolele din caseta de listă, apoi faceți clic din nou pe dreptunghi pentru a afișa toate elementele selectate în celula E4. Vedeți mai jos demonstrația:
7. Și apoi salvați registrul de lucru ca Cartea de lucru Excel MacroEnable pentru refolosirea codului în viitor.
Creați o listă verticală cu casete de selectare cu un instrument uimitor
Metoda de mai sus este prea multistep pentru a fi ușor de manipulat. Aici recomandăm cu tărie Listă derulantă cu casete de selectare utilitatea Kutools pentru Excel pentru a vă ajuta să creați cu ușurință o listă verticală cu casete de selectare într-un interval specificat, foaia de lucru curentă, registrul de lucru curent sau toate registrele de lucru deschise în funcție de nevoile dvs. Vedeți demo-ul de mai jos:
Descărcați și încercați acum! (traseu gratuit de 30 de zile)
Pe lângă demonstrația de mai sus, oferim și un ghid pas cu pas pentru a demonstra cum să aplicați această caracteristică pentru a realiza această sarcină. Vă rugăm să faceți următoarele.
1. Deschideți foaia de lucru pe care ați setat lista verticală de validare a datelor, faceți clic pe Kutools > Lista verticală > Listă derulantă cu casete de selectare > Setări. Vedeți captura de ecran:
2. În Listă derulantă cu setările casetelor de selectare casetă de dialog, vă rugăm să configurați după cum urmează.
- 2.1) În Aplica pentru secțiunea, specificați domeniul de aplicare în care veți crea casete de selectare pentru elementele din lista derulantă. Puteți specifica un anumită gamă, foaia de lucru curentă, registrul de lucru curent or toate registrele de lucru deschise în funcție de nevoile dumneavoastră.
- 2.2) În mod secțiunea, alegeți un stil pe care doriți să-l scoateți în evidență elementele selectate;
- Aici ia Modifica opțiune ca exemplu, dacă alegeți acest lucru, valoarea celulei va fi modificată pe baza elementelor selectate.
- 2.3) În Separator caseta, introduceți un delimitator pe care îl veți utiliza pentru a separa mai multe elemente;
- 2.4) În Direcția textului secțiune, selectați o direcție de text în funcție de nevoile dvs.;
- 2.5) Faceți clic pe OK butonul.
3. Ultimul pas, faceți clic pe Kutools > Lista verticală > Listă derulantă cu casete de selectare > Activați lista drop-down a casetelor de selectare pentru a activa această caracteristică.
De acum înainte, când faceți clic pe celulele cu lista derulantă într-un domeniu de aplicare specificat, va apărea o casetă listă, selectați elementele bifând casetele de selectare pentru a ieși în celulă, așa cum se arată în demonstrația de mai jos (Luați modul de modificare ca exemplu ).
Pentru mai multe detalii despre această caracteristică, vă rugăm să vizitați aici.
Dacă doriți să aveți o perioadă de încercare gratuită (30 de zile) a acestui utilitar, vă rugăm să faceți clic pentru a-l descărca, și apoi mergeți pentru a aplica operația conform pașilor de mai sus.
Legate de articole:
Completați automat când tastați în lista verticală Excel
Dacă aveți o listă derulantă de validare a datelor cu valori mari, trebuie să derulați în jos în listă doar pentru a o găsi pe cea potrivită sau să tastați întregul cuvânt direct în caseta de listă. Dacă există o metodă pentru a permite completarea automată la introducerea primei litere din lista derulantă, totul va deveni mai ușor. Acest tutorial oferă metoda de rezolvare a problemei.
Creați o listă verticală dintr-un alt registru de lucru în Excel
Este destul de ușor să creați o listă verticală de validare a datelor printre foile de lucru dintr-un registru de lucru. Dar dacă datele listei de care aveți nevoie pentru validarea datelor se află într-un alt registru de lucru, ce ați face? În acest tutorial, veți afla cum să creați o listă de eliminare dintr-un alt registru de lucru în Excel în detalii.
Creați o listă drop-down căutabilă în Excel
Pentru o listă verticală cu numeroase valori, găsirea unuia corect nu este o lucrare ușoară. Anterior, am introdus o metodă de completare automată a listei derulante atunci când introduceți prima literă în caseta derulantă. Pe lângă funcția de completare automată, puteți face ca lista derulantă să poată fi căutată pentru îmbunătățirea eficienței de lucru în găsirea valorilor corespunzătoare în lista derulantă. Pentru ca lista derulantă să poată fi căutată, încercați metoda din acest tutorial.
Completați automat alte celule atunci când selectați valorile din lista verticală Excel
Să presupunem că ați creat o listă derulantă pe baza valorilor din intervalul de celule B8: B14. Când selectați orice valoare din lista derulantă, doriți ca valorile corespunzătoare din intervalul de celule C8: C14 să fie populate automat într-o celulă selectată. Pentru rezolvarea problemei, metodele din acest tutorial vă vor face o favoare.
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!