O casetă listă este o listă din care un utilizator poate selecta un element. Pentru a crea un casetă listă în Excel VBA, executați pașii următori.
1. În fila Dezvoltator, faceți clic pe Inserare.
2. În grupul ActiveX Controls, faceți clic pe List Box.
3. Trageți o casetă listă pe foaia de lucru.
Notă: puteți schimba numele unui control făcând clic dreapta pe control (asigurați-vă că este selectat Modul de proiectare) și apoi faceți clic pe Proprietăți. Deocamdată, vom lăsa ListBox1 ca nume al casetei de listă.
Creați un eveniment deschis de registru de lucru. Codul adăugat la Evenimentul deschis al registrului de lucru va fi executat de Excel VBA când deschideți registrul de lucru.
4. Deschideți Editorul Visual Basic.
5. Faceți dublu clic pe acest registru de lucru în Project Explorer.
6. Alegeți Cartea de lucru din lista verticală din stânga și alegeți Deschidere din lista verticală din dreapta.
7. Pentru a adăuga elemente în caseta de listă, adăugați următoarele linii de cod la Evenimentul deschis al registrului de lucru:
Cu Sheet1.ListBox1
.AddItem "Paris"
.AddItem "New York"
.AddItem "Londra"
Se termina cu
Notă: utilizați Sheet2 dacă caseta dvs. de listă este situată pe a doua foaie de lucru, Sheet3 dacă caseta de listă este situată pe a treia foaie de lucru etc. Dacă utilizați aceste linii de cod în afara evenimentului Open Workbook, vă recomandăm să adăugați următoarea linie de cod înainte de aceste linii de cod. Această linie de cod șterge caseta de listă. În acest fel, articolele dvs. nu vor fi adăugate de mai multe ori dacă executați codul dvs. de mai multe ori.
ListBox 1. Ștergeți
8. Pentru a lega această casetă listă de o celulă, faceți clic dreapta pe caseta listă (asigurați-vă că este selectat modul de proiectare) și faceți clic pe Proprietăți. Completați D3 pentru LinkedCell.
Notă: consultați și proprietatea ListFillRange pentru a completa o casetă listă cu o gamă de celule.
9. Salvați, închideți și redeschideți fișierul Excel.
Rezultat:
Deși în unele situații poate fi util să plasați direct o casetă de listă pe foaia dvs. de lucru, o casetă de listă este deosebit de utilă atunci când este plasată pe un formular de utilizator.
