Polje s seznamom je seznam, na katerem lahko uporabnik izbere element. Če želite ustvariti a polje s seznamom v Excel VBA, izvedite naslednje korake.
1. Na zavihku Razvijalec kliknite Vstavi.
2. V skupini Kontrolniki ActiveX kliknite Seznam.
3. Povlecite polje s seznamom na delovnem listu.
Opomba: ime kontrolnika lahko spremenite tako, da z desno miškino tipko kliknete na kontrolnik (preverite, ali je izbran način za oblikovanje) in nato kliknite na Lastnosti. Zaenkrat bomo ime polja ListBox1 pustili kot ime.
Ustvarite odprt dogodek delovnega zvezka. Kodo, dodano dogodku odprtega delovnega zvezka, bo Excel VBA izvedel, ko odprete delovni zvezek.
4. Odprite urejevalnik Visual Basic.
5. Dvokliknite Ta delovni zvezek v Raziskovalcu projektov.
6. Na levem spustnem seznamu izberite Delovni zvezek in na desnem spustnem seznamu izberite Odpri.
7. Če želite dodati elemente v polje s seznamom, v odprti dogodek delovnega zvezka dodajte naslednje vrstice kode:
S Sheet1.ListBox1
.Dodatek "Pariz"
.AddItem "New York"
.Dodatek "London"
Končaj s
Opomba: uporabite Sheet2, če je vaše polje s seznamom na drugem delovnem listu, Sheet3, če se vaše polje s seznamom nahaja na tretjem delovnem listu itd. Če te kodne vrstice uporabljate zunaj dogodka Odpiranje delovnega zvezka, boste morda želeli dodati naslednjo kodno vrstico. pred temi kodnimi vrsticami. Ta vrstica kode počisti polje s seznamom. Na ta način vaši elementi ne bodo dodani večkrat, če kodo izvedete večkrat.
ListBox1.Clear
8. Če želite povezati to polje s celico, z desno miškino tipko kliknite polje s seznamom (preverite, ali je izbran način oblikovanja) in kliknite Lastnosti. Izpolnite D3 za LinkedCell.
Opomba: glejte tudi lastnost ListFillRange, da zapolnite polje s seznamom z obsegom celic.
9. Shranite, zaprite in znova odprite datoteko Excel.
Rezultat:
Čeprav je v nekaterih situacijah lahko koristno, da polje na svojem delovnem listu postavite neposredno, je polje še posebej uporabno, če ga postavite na uporabniški obrazec.
