Lista verticală Excel: creați, editați, eliminați și operațiuni mai avansate

O listă derulantă este similară cu caseta de listă care permite utilizatorilor să aleagă o valoare dintr-o listă de selecție. Acest tutorial va demonstra operațiunile de bază pentru lista verticală: creați, editați și eliminați lista verticală în Excel. În afară de aceasta, acest tutorial oferă operațiuni avansate pentru lista derulantă pentru a-și îmbunătăți funcționalitatea pentru a rezolva mai multe probleme Excel.

Creați o listă verticală simplă

Pentru a utiliza o listă derulantă, trebuie să aflați cum să o creați mai întâi. Această secțiune oferă 6 moduri de a vă ajuta să creați o listă derulantă în Excel.

Creați o listă derulantă dintr-o gamă de celule

Aici, vom demonstra pașii pentru a crea o listă derulantă dintr-un interval de celule în Excel. Vă rugăm să faceți după cum urmează

1. Selectați un interval de celule pentru localizarea listei derulante.

sfaturi: Puteți crea o listă derulantă pentru mai multe celule necontigue în același timp ținând apăsat butonul Ctrl în timp ce selectați celulele una câte una.

2. clic Date > Data validarii > Data validarii.

3. În Data validarii caseta de dialog, sub Setări cont filă, vă rugăm să configurați după cum urmează.

notițe:

Acum este creată lista derulantă. Când faceți clic pe celula listă verticală, o săgeată va fi afișată lângă ea, faceți clic pe săgeată pentru a extinde lista și apoi puteți alege un element din ea.

Creați o listă verticală dinamică din tabel

Puteți converti intervalul de date într-un tabel Excel și apoi puteți crea o listă derulantă dinamică pe baza intervalului de tabele.

1. Selectați intervalul de date original, apoi apăsați pe Ctrl + T chei.

2. clic OK în pop-up Creați tabel căsuță de dialog. Apoi, intervalul de date este convertit în tabel.

3. Selectați un interval de celule pentru plasarea listei derulante, apoi faceți clic pe Date > Data validarii > Data validarii.

4. În Data validarii casetă de dialog, trebuie să:

Apoi, sunt create liste derulante dinamice. Când adăugați sau eliminați date din intervalul de tabel, valorile din lista derulantă vor fi actualizate automat.

Creați o listă derulantă dinamică cu formule

În afară de crearea unei liste derulante dinamice din gama de tabele, puteți utiliza și o formulă pentru a crea o listă derulantă dinamică în Excel.

1. Selectați celulele în care să afișați listele derulante.

2. clic Date > Data validarii > Data validarii.

3. În Data validarii casetă de dialog, vă rugăm să configurați după cum urmează.

Apoi, sunt create liste derulante dinamice. Când adăugați sau eliminați date din intervalul specific, valorile din listele derulante vor fi actualizate automat.

Creați o listă derulantă din intervalul denumit

De asemenea, puteți crea o listă derulantă dintr-un interval numit în Excel.

1. În primul rând, creați un interval numit. Selectați intervalul de celule pe care veți crea intervalul numit pe baza acestuia, apoi tastați numele intervalului în Nume și apăsați Intrați cheie.

2. clic Date > Data validarii > Data validarii.

3. În Data validarii casetă de dialog, vă rugăm să configurați după cum urmează.

Acum este creată lista derulantă care utilizează date dintr-un interval numit.

Creați o listă verticală dintr-un alt registru de lucru

Să presupunem că există un registru de lucru numit „Date sursă”, și doriți să creați o listă derulantă într-un alt registru de lucru pe baza datelor din acest „Date sursă”Registru de lucru, vă rugăm să faceți următoarele.

1. Deschideți registrul de lucru „SourceData”. În acest registru de lucru, selectați datele pe care veți crea o listă derulantă bazată pe, introduceți un nume de interval în Nume , apoi apăsați pe Intrați cheie.

Aici numesc gama ca Oraș.

2. Deschideți foaia de lucru pe care o veți insera lista derulantă. Clic Formule > Definiți numele.

3. În Nume nou caseta de dialog, trebuie să creați un interval numit pe baza numelui intervalului pe care l-ați creat în registrul de lucru „SourceData”, vă rugăm să configurați după cum urmează.

notițe:

4. Deschideți registrul de lucru pe care îl veți insera lista derulantă, selectați celulele pentru lista derulantă, apoi faceți clic pe Date > Data validarii > Data validarii.

5. În Data validarii casetă de dialog, vă rugăm să configurați după cum urmează.

Acum listele derulante au fost inserate în intervalul selectat. Și valorile derulante provin dintr-un alt registru de lucru.

Creați cu ușurință o listă derulantă cu un instrument uimitor

Aici, recomand cu căldură Creați o listă verticală simplă utilitatea Kutools pentru Excel. Cu această caracteristică, puteți crea cu ușurință o listă derulantă cu valori de celule specifice sau puteți crea o listă derulantă cu liste personalizate prestabilite în Excel.

1. Selectați celulele pe care doriți să le inserați listă derulantă, apoi faceți clic pe Kutools > Lista verticală > Creați o listă verticală simplă.

2. În Creați o listă verticală simplă casetă de dialog, vă rugăm să configurați după cum urmează.

notițe: Dacă doriți să creați o listă derulantă bazată pe o listă personalizată prestabilită în Excel, vă rugăm să selectați Listele personalizate opțiune în Sursă , alegeți o listă personalizată în Listele personalizate , apoi faceți clic pe OK butonul.

Acum listele derulante au fost inserate în intervalul selectat.

Editați lista derulantă

Dacă doriți să editați lista derulantă, metodele din această secțiune vă pot face o favoare.

Editați o listă verticală pe baza unui interval de celule

Pentru a edita o listă derulantă pe baza unui interval de celule, procedați după cum urmează.

1. Selectați celulele care conțin lista derulantă pe care doriți să o editați, apoi faceți clic pe Date > Data validarii > Data validarii.

2. În Data validarii caseta de dialog, modificați referințele celulei din Sursă apoi faceți clic pe OK butonul.

Editați o listă verticală pe baza unui interval numit

Presupunând că adăugați sau ștergeți valori în intervalul numit, iar lista derulantă este creată pe baza acestui interval denumit. Pentru a afișa valorile actualizate în listele derulante, procedați după cum urmează.

1. clic Formule > Manager nume.

sfaturi: Puteți deschide fișierul Manager nume fereastra apăsând tasta Ctrl + F3 chei.

2. În Manager nume fereastra, trebuie să configurați după cum urmează:

2.1) În Nume caseta, selectați intervalul numit pe care doriți să îl actualizați;

2.2) În Se refera la , faceți clic pe butonul pentru a selecta intervalul actualizat pentru lista dvs. derulantă;

2.3) Faceți clic pe Închide butonul.

3. Apoi a Microsoft Excel caseta de dialog apare, faceți clic pe Da pentru a salva modificările.

Apoi, listele derulante bazate pe acest interval numit sunt actualizate.

Eliminați lista derulantă

Această secțiune vorbește despre eliminarea listei derulante din Excel.

Eliminați lista derulantă cu funcția încorporată Excel

Excel oferă o funcție încorporată pentru a ajuta la eliminarea listei drop-down din foaia de lucru. Vă rugăm să faceți după cum urmează.

1. Selectați intervalul de celule care conține lista derulantă pe care doriți să o eliminați.

2. clic Date > Data validarii > Data validarii.

3. În Data validarii , faceți clic pe Goliți toate , apoi faceți clic pe OK pentru a salva modificările.

Acum listele derulante sunt eliminate din intervalul selectat.

Eliminați cu ușurință listele derulante cu un instrument uimitor

Kutools pentru Excel oferă un instrument la îndemână - Ștergeți restricția de validare a datelors pentru a ajuta la eliminarea ușoară a listei derulante dintr-unul sau mai multe intervale selectate simultan. Vă rugăm să faceți următoarele.

1. Selectați intervalul de celule care conține lista derulantă pe care doriți să o eliminați.

2. clic Kutools > Preveniți tastarea > Ștergeți restricțiile de validare a datelor. Vedeți captura de ecran:

3. Apoi a Kutools pentru Excel apare fereastra de dialog pentru a vă întreba dacă ștergeți lista verticală, faceți clic pe OK butonul.

Apoi listele derulante din acest interval selectat sunt eliminate imediat.

Adăugați culoare la lista verticală

În unele cazuri, poate fi necesar să creați o listă derulantă care să fie codificată cu culori pentru a distinge dintr-o privire datele din celulele listei derulante. Această secțiune oferă două metode pentru a vă ajuta să rezolvați problema în detaliu.

Adăugați culoare la lista verticală cu Formatarea condiționată

Puteți crea reguli condiționale pentru celula care conține lista derulantă pentru a o face codificată în culori. Vă rugăm să faceți următoarele.

1. Selectați celulele care conțin lista derulantă pe care doriți să o faceți codificată în culori.

2. clic Acasă > Formatarea condițională > Gestionați regulile.

3. În Manager condiționat de formatare Rues , faceți clic pe Noua regulă butonul.

4. În Noua regulă de formatare casetă de dialog, vă rugăm să configurați după cum urmează.

4.1) În Selectați un tip de regulă caseta, alegeți Formatează numai celulele care conțin opțiune;

4.2) În Formatează numai celulele cu secțiune, selectați Text specific din prima listă derulantă, selectați conținând din a doua listă derulantă, apoi selectați primul element din lista sursă în a treia casetă;

sfaturi: Aici selectez celula A16 în a treia casetă de text. A16 este primul articol din lista de surse pe care am creat lista derulantă bazată pe.

4.3) Faceți clic pe Format butonul.

4.4) În Celule de format caseta de dialog, accesați Umple , alegeți o culoare de fundal pentru textul specificat, apoi faceți clic pe OK buton. Sau puteți alege o anumită culoare de font pentru text, după cum aveți nevoie.

4.5) Faceți clic pe OK când revine la butonul Noua regulă de formatare căsuță de dialog.

5. Când revine la Managerul de reguli de formatare condiționată caseta de dialog, repetați pașii 3 și 4 de mai sus pentru a specifica culorile pentru alte elemente derulante. După ce ați terminat de specificat culorile, faceți clic pe OK pentru a salva modificările.

De acum înainte, atunci când selectați un articol din lista derulantă, celula va fi evidențiată cu culoarea de fundal specificată pe baza textului selectat.

Adăugați cu ușurință culoare la lista derulantă cu un instrument uimitor

Aici vă prezentăm Listă derulantă colorată caracteristică a Kutools pentru Excel pentru a vă ajuta să adăugați cu ușurință culoare la lista verticală din Excel.

1. Selectați celulele care conțin lista derulantă pe care doriți să o adăugați culoare.

2. clic Kutools > Lista verticală > Listă derulantă colorată.

3. În Listă derulantă colorată caseta de dialog, vă rugăm să procedați după cum urmează.

sfaturi: Dacă doriți să evidențiați rândurile pe baza selectării listei derulante, vă rugăm să alegeți Rândul intervalului de date opțiune în Aplica pentru , apoi selectați rândurile pe care le veți evidenția în Evidențiați rândurile cutie.

Acum, listele derulante sunt codificate în culori, după cum se arată în capturile de ecran de mai jos.

Evidențiați celulele pe baza selecției listei derulante

Evidențiați rândurile pe baza selecției listei derulante

Creați o listă derulantă dependentă în Excel sau Foi de calcul Google

O listă derulantă dependentă ajută la afișarea opțiunilor în funcție de valoarea selectată în prima listă derulantă. Dacă trebuie să creați o listă derulantă dependentă (cascarding) în foaia de lucru Excel sau în Foi de calcul Google, metodele din această secțiune vă pot face o favoare.

Creați o listă verticală dependentă în foaia de lucru Excel

Demo-ul de mai jos afișează lista verticală dependentă în foaia de lucru Excel.

Vă rugăm să faceţi clic pe Cum se creează o listă derulantă în cascadă dependentă în Excel? pentru un tutorial de ghid pas cu pas.

Creați o listă derulantă dependentă în Foi de calcul Google

Dacă doriți să creați o listă derulantă dependentă în Foi de calcul Google, consultați Cum să creați o listă verticală dependentă în foaia Google?

Creați liste derulante care pot fi căutate

Pentru listele drop-down care conțin o listă lungă de elemente dintr-o foaie de lucru, nu este ușor pentru tine să ridici un anumit articol din listă. Dacă vă amintiți caracterele inițiale sau mai multe caractere consecutive ale unui articol, puteți efectua funcția de căutare într-o listă derulantă pentru a o filtra cu ușurință. Această secțiune va demonstra cum să creați o listă drop-down care poate fi căutată în Excel.

Presupunând că datele sursă pe care doriți să creați o listă derulantă bazată pe se află în coloana A din Sheet1, așa cum se arată în captura de ecran de mai jos. Vă rugăm să faceți după cum urmează pentru a crea o listă derulantă care poate fi căutată în Excel cu aceste date.

1. În primul rând, creați o coloană de ajutor lângă lista de date sursă cu o formulă matrice.

În acest caz, selectez celula B2, introduc formula de mai jos în ea și apoi apăs pe Ctrl + Schimba + Intrați chei pentru a obține primul rezultat.

=IFERROR(INDEX($A$2:$A$50,SMALL(IFERROR(MATCH(IF(FIND(CELL("contents"),$A$2:$A$50)>0,$A$2:$A$50,""),$A$2:$A$50,0),""),ROW(A1))),"")

Selectați prima celulă rezultată, apoi glisați-o Mâner de umplere până la capătul listei.

notițe: În această formulă matrice, $A$2:$A$50 este intervalul de date sursă în care veți crea o listă derulantă. Schimbați-l în funcție de intervalul de date.

2. clic Formule > Definiți numele.

3. În Editeaza numele casetă de dialog, vă rugăm să configurați după cum urmează.

Acum trebuie să creați lista derulantă pe baza intervalului numit. În acest caz, voi crea o listă derulantă căutabilă în Sheet2.

4. Deschideți Sheet2, selectați gama de celule pentru lista derulantă, apoi faceți clic pe Date > Data validarii > Data validarii.

5. În Data validarii caseta de dialog, vă rugăm să procedați după cum urmează.

5.1) În Permite selectați Listă;

5.2) Faceți clic pe Sursă , apoi apăsați pe F3 cheie;

5.3) În fereastra pop-up Inserați numele , selectați intervalul numit pe care l-ați creat la pasul 3 și apoi faceți clic pe OK;

sfaturi: Puteți introduce direct intervalul numit ca = interval denumit în Sursă cutie.

5.4) Faceți clic pe Alertă de eroare filă, debifați Afișați alerta de eroare după introducerea datelor nevalide , apoi faceți clic pe butonul OK butonul.

6. Faceți clic dreapta pe fila Foaie (Sheet2) și selectați Afișați codul din meniul cu clic dreapta.

7. În deschidere Microsoft Visual Basic pentru aplicații fereastră, copiați codul VBA de mai jos în editorul de coduri.

Cod VBA: creați o listă verticală care poate fi căutată în Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Calculate
End Sub

8. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

Acum sunt create listele drop-down care pot fi căutate. Dacă doriți să ridicați un element, introduceți unul sau mai multe caractere consecutive ale acestui element în celula derulantă, faceți clic pe săgeata derulantă, iar apoi elementul bazat pe conținutul introdus sunt listate în lista derulantă. Vedeți captura de ecran:

notițe: Această metodă este sensibilă la majuscule și minuscule.

Creați o listă derulantă, dar afișați valori diferite

Presupunând că ați creat o listă derulantă, atunci când selectați un articol din ea, doriți să se afișeze altceva în celulă. După cum se arată în demonstrația de mai jos, ați creat o listă derulantă pe baza listei de nume de țară, când selectați numele țării din meniul derulant, doriți să afișați abrevierea numelui țării selectate în celula derulantă. Această secțiune oferă metoda VBA pentru a vă ajuta să rezolvați problema.

1. În partea dreaptă a datelor sursă (coloana cu numele țării), creați o nouă coloană care să conțină abrevierea numelor țărilor pe care doriți să le afișați în celula drop-down.

2. Selectați atât lista de nume de țări, cât și lista de abrevieri, introduceți un nume în Nume și apoi apăsați tasta Intrați cheie.

3. Selectați celulele pentru lista derulantă (aici selectez D2: D8), apoi faceți clic pe Date > Data validarii > Data validarii.

4. În Data validarii casetă de dialog, vă rugăm să configurați după cum urmează.

5. După crearea listei derulante, faceți clic dreapta pe fila foaie și apoi selectați Afișați codul din meniul cu clic dreapta.

6. În deschidere Microsoft Visual Basic pentru aplicații fereastră, copiați codul VBA de mai jos în editorul de coduri.

Cod VBA: afișați valori diferite în lista derulantă

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20201027
    selectedNa = Target.Value
    If Target.Column = 4 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

notițe:

7. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

De acum înainte, atunci când selectați un anumit nume de țară din lista verticală, abrevierea corespunzătoare a numelui țării selectate va fi afișată în celulă.

Creați o listă verticală cu casete de selectare

Mulți utilizatori Excel tind să creeze o listă derulantă cu mai multe casete de selectare, astfel încât să poată selecta mai multe elemente din listă doar bifând casetele de selectare.

După cum se arată în demonstrația de mai jos, atunci când faceți clic pe celula care conține lista derulantă, apare o listă. În caseta listă, există o casetă de selectare înaintea fiecărui element. Puteți bifa casetele de selectare pentru a afișa elementele corespunzătoare în celulă.

Dacă doriți să creați o listă verticală cu casete de selectare în Excel, consultați Cum se creează o listă derulantă cu mai multe casete de selectare în Excel?.

Adăugați completarea automată pentru a afișa lista derulantă

Dacă aveți o listă derulantă de validare a datelor cu elemente mari, trebuie să derulați în sus și în jos în listă pentru a-l găsi pe cel potrivit sau să tastați întreg cuvântul direct în caseta cu listă. Dacă lista derulantă se poate completa automat la introducerea primei litere din ea, totul va deveni mai ușor.

Pentru a realiza completarea automată a listei drop-down într-o foaie de lucru în Excel, consultați Cum se completează automat când se introduce o listă derulantă în Excel?.

Filtrează datele pe baza selecției listei derulante

Această secțiune va arăta cum să aplicați formule pentru a crea un filtru listă derulantă pentru a extrage date pe baza selecției din lista derulantă.

1. În primul rând, trebuie să creați o listă derulantă cu valorile specifice pe care să extrageți date.

sfaturi: Vă rugăm să urmați pașii de mai sus pentru creați o listă derulantă în Excel.

Creați o listă verticală cu o listă unică de articole

Dacă există dubluri în intervalul dvs. și nu doriți să creați o listă derulantă cu repetarea unui articol, puteți crea o listă unică de articole după cum urmează.

1) Copiați celulele pe care veți crea o listă derulantă bazată pe Ctrl + C , apoi lipiți-le într-un interval nou.

2) Selectați celulele din noua gamă, faceți clic pe Date > Eliminați duplicatele.

3) În Eliminați duplicatele , faceți clic pe OK butonul.

4) Apoi a Microsoft Excel apare pentru a vă spune câte duplicate sunt eliminate, faceți clic pe OK.

Acum obțineți lista unică de articole, puteți crea o listă derulantă bazată pe această listă unică acum.

2. Apoi, trebuie să creați trei coloane de ajutor, după cum urmează.

2.1) Pentru prima coloană helper (aici aleg coloana D ca prima coloană helper), introduceți formula de mai jos în prima celulă (cu excepția antetului coloanei), apoi apăsați tasta Intrați cheie. Selectați celula de rezultat și apoi trageți Mâner de umplere tot drumul în jos până când ajunge la partea de jos a intervalului.

= RUNURI ($ A $ 2: A2)

2.2) Pentru a doua coloană de ajutor (coloana E), introduceți formula de mai jos în celula E2 și apoi apăsați pe Intrați cheie. Selectați E2 și apoi trageți Mâner de umplere până în partea de jos a gamei.

Notă: Dacă nu este selectată nicio valoare în lista derulantă, aici rezultatele formulelor vor fi afișate ca necompletate.

= IF (A2 = $ H $ 2, D2, "")

2.3) Pentru a treia coloană de ajutor (coloana F), introduceți formula de mai jos în F2 și apoi apăsați pe Intrați cheie. Selectați F2 și apoi trageți Mâner de umplere până în partea de jos a gamei.

notițe: Dacă nu este selectată nicio valoare în lista derulantă, rezultatele formulelor vor fi afișate ca necompletate.

= IFERROR (MICĂ ($ E $ 2: $ E $ 17, D2), "")

3. Creați un interval bazat pe intervalul de date original pentru a afișa datele extrase cu formulele de mai jos.

3.1) Selectați prima celulă de ieșire (Aici selectez J2), introduceți formula de mai jos în ea și apoi apăsați tasta Intrați cheie.

=IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"")

3.2) Selectați celula de rezultat, apoi glisați Mâner de umplere peste cele două celule din dreapta.

3.3) Păstrați intervalul J2:l2 selectat, trageți mânerul de umplere până la capăt până ajunge la partea de jos a intervalului.

notițe:

Acum este creat un filtru de listă derulantă, puteți extrage cu ușurință date din intervalul de date original pe baza selecției listei derulante.

Selectați mai multe articole din lista derulantă

În mod implicit, lista derulantă permite utilizatorilor să selecteze doar un articol per dată într-o celulă. Când reselegeți un element dintr-o listă derulantă, elementul selectat anterior va fi suprascris. Cu toate acestea, dacă vi se cere să selectați mai multe articole dintr-o listă derulantă și să le afișați pe toate în celula verticală, așa cum se arată în demonstrația de mai jos, cum puteți face?

Pentru a selecta mai multe articole din lista derulantă în Excel, consultați Cum se creează o listă derulantă cu selecții multiple sau valori în Excel?. Acest tutorial oferă două metode în detaliu pentru a vă ajuta să rezolvați problema.

Setați valoarea implicită (preselectată) pentru lista derulantă

În mod implicit, o celulă listă verticală se afișează ca necompletată, săgeata verticală apare doar când faceți clic pe celulă. Cum să vă dați seama ce celule conțin liste derulante dintr-o foaie de lucru dintr-o privire?

Această secțiune va arăta cum să setați valoarea implicită (preselectată) pentru lista derulantă în Excel. Vă rugăm să faceți următoarele.

Înainte de a aplica cele două metode de mai jos, trebuie să creați o listă derulantă și să faceți câteva configurații după cum urmează.

1. Selectați celulele pentru lista derulantă, faceți clic pe Date > Data validarii > Data validarii.

sfaturi: Dacă ați creat deja o listă derulantă, selectați celulele care conțin lista derulantă, apoi faceți clic pe Date > Data validarii > Data validarii.

2. În Data validarii casetă de dialog, vă rugăm să configurați după cum urmează.

2.1) În Permite selectați Listă;

2.2) În Sursă , selectați datele sursă pe care le veți afișa în lista derulantă.

sfaturi: Pentru lista derulantă pe care ați creat-o deja, vă rugăm să ignorați acești doi pași.

2.3) Apoi mergeți la Alertă de eroare filă, debifați Afișați alerta de eroare după introducerea datelor nevalide cutie;

2.4) Faceți clic pe OK butonul.

După crearea listei derulante, vă rugăm să aplicați una dintre metodele de mai jos pentru a seta valoarea implicită pentru acestea.

Setați valoarea implicită pentru lista derulantă cu formulă

Puteți aplica formula de mai jos pentru a seta valoarea implicită pentru lista derulantă pe care ați creat-o după cum se arată în pașii de mai sus.

1. Selectați celula din lista derulantă, introduceți formula de mai jos în ea și apoi apăsați pe Intrați pentru a afișa valoarea implicită. Dacă celulele listei derulante sunt consecutive, puteți trage Mâner de umplere a celulei rezultate pentru a aplica formula altor celule.

= IF (C2 = "", "--Alegeți elementul din listă -")

notițe:

Setați valoarea implicită pentru toate listele derulante dintr-o foaie de lucru simultan cu cod VBA

Presupunând că există o mulțime de liste derulante situate în diferite intervale în foaia de lucru, pentru a seta valoarea implicită pentru toate, trebuie să aplicați formula în mod repetat. Asta consumă timp. Această secțiune oferă un cod VBA util pentru a seta valoarea implicită pentru toate listele drop-down dintr-o foaie de lucru simultan.

1. Deschideți foaia de lucru care conține listele derulante pe care doriți să le setați valoarea implicită, apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Moduleși apoi lipiți codul VBA de mai jos în fereastra Cod.

Cod VBA: setați valoarea implicită pentru toate listele derulante dintr-o foaie de lucru simultan

Sub SetDropDownListToDefaultValue()
'Updated by Extendoffice 20201026
Dim xWs As Worksheet
Dim xRg, xFRg As Range
Dim xET: xET = Null
Dim xStr As String
xStr = "- Choose from the list -"
Set xWs = Application.ActiveSheet
Set xRg = xWs.UsedRange.Cells
    On Error Resume Next
    For Each xFRg In xRg
    xET = Null
    xET = xFRg.Validation.Type
    If Not IsNull(xET) Then
        If xFRg.Validation.Type = 3 Then
            xFRg.Value = "'" & xStr
        End If
    End If
    Next
End Sub

notițe: În codul de mai sus, - Alege din listă - este valoarea implicită de afișat în celula listă derulantă. De asemenea, puteți modifica valoarea implicită în funcție de nevoile dvs.

3. apasă pe F5 , apoi apare o casetă de dialog Macros, asigurați-vă că DropDownListToDefault este selectat în Nume macro , apoi faceți clic pe Alerga pentru a rula codul.

Apoi valoarea implicită specificată este completată imediat în celulele listei derulante.

Măriți dimensiunea fontului listei derulante

În mod normal, lista drop-down are o dimensiune fixă ​​a fontului, dacă dimensiunea fontului este prea mică pentru a fi citită, puteți încerca metoda VBA de mai jos pentru a o mări.

1. Deschideți foaia de lucru care conține listele derulante pe care doriți să le măriți dimensiunea fontului, faceți clic dreapta pe fila foaie și apoi selectați Afișați codul din meniul cu clic dreapta.

2. În Microsoft Visual Basic pentru aplicații fereastră, copiați codul VBA de mai jos în editorul de coduri.

Cod VBA: măriți dimensiunea fontului listelor derulante dintr-o foaie de lucru

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'updateby Extendoffice 20201027
    On Error GoTo LZoom
    Dim xZoom As Long
    xZoom = 100
    If Target.Validation.Type = xlValidateList Then xZoom = 130
LZoom:
    ActiveWindow.Zoom = xZoom
End Sub

notițe: Aici, xZoom = 130 în cod înseamnă că veți mări dimensiunea fontului tuturor listelor derulante din foaia de lucru curentă la 130. O puteți modifica după cum aveți nevoie.

3. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

De acum înainte, când faceți clic pe celula drop-down, nivelul de zoom al foii de lucru curente va fi mărit, faceți clic pe săgeata drop-down, puteți vedea că dimensiunea fontului tuturor elementelor drop-down este, de asemenea, mărită.

După ce selectați un element din lista derulantă, puteți face clic pe orice celulă din afara celulei drop-down pentru a reveni la nivelul de zoom inițial.