Što je List Box u Excelu VBA?
List Box je jedan od alata pod korisničkim obrascem u VBA. Kao što samo ime sugerira, okvir za popis sadrži sav popis vrijednosti koji je dao korisnik. U okviru VBA Lista dolazi s korisničkim obrascem. U ovom ćemo članku vidjeti kako stvoriti okvir s popisom i kako držati vrijednosti u popisnom okviru u Excelu VBA.
List Box je okvir u kojem se mogu nalaziti vrijednosti. Na ovom popisu stavki korisnik može odabrati stavku prikazanu u popisnom okviru.
Okvir popisa također možemo izraditi u regularnom listu excela.
Kako stvoriti popisni okvir u Excelu?
Pretpostavimo da imate popis mjeseca u nekom od excel lista.
Za ovaj popis mjeseci stvorit ćemo okvir s popisom. Slijedite dolje navedene korake za izradu okvira s popisom u radnom listu Excela:
1. korak: idite na karticu za razvojne programere. U programu za razvojne programere idite na opciju Umetanje, a ispod umetanja, opciju Idite na kontrolu obrasca, pod kontrolom obrasca odaberite Popisni okvir.
2. korak: Nakon odabira okvira s popisom nacrtajte okvir s listom u Excelu.
Korak 3: Desnom tipkom miša kliknite umetnuti popisni okvir i odaberite Format Control .
Korak 4: Pod kontrolom formata idite na Kontrola . Odaberite raspon unosa kao naziv mjeseca i navedite referencu na ćeliju D1, a zatim kliknite na U redu .
Korak 5: Na popisu ćemo imati popis mjeseca.
Korak 6: Odaberite bilo koju stavku u okviru s popisom i pogledajte promjenu u ćeliji D1.
Dakle, dobili smo 3 kao rezultat u ćeliji D1 jer je Mar treća stavka na popisu.
Kako stvoriti popisni okvir u VBA?
Stvaranje popisa nije tako jednostavno kao što smo vidjeli u gornjem primjeru, morate imati veliku količinu znanja o Excel VBA makronaredbama.
Ovdje možete preuzeti ovaj obrazac Excel predložaka s VBA List Boxom - Predložak VBA List Box ExcelVBA popisni okvir - primjer br. 1
Razumijevanje VBA liste.
Možete uzeti u obzir sljedeći primjer za bolje razumijevanje VBA liste.
Slijedite korake u nastavku kako biste stvorili okvir s popisom u VBA.
Korak 1: U Visual Basic Window Umetnite korisnički obrazac.
Korak 2: Čim umetnete korisnički obrazac možete vidjeti okvir alata zajedno s korisničkim obrascem.
Korak 3: U ovom okviru alata odaberite Popisni okvir .
Korak 4: Nacrtajte ovaj popis na korisničkom obrascu.
Korak 5: Nakon umetanja okvira s popisom, navedite odgovarajuće ime ovom popisu u prozoru Svojstva.
Korak 6: Pomaknite se prema dolje i pronađite "Izvor reda". Pri tome upišite raspon vrijednosti imena vašeg mjeseca zajedno s nazivom lista.
Korak 7: Čim date referencu, možete vidjeti nazive mjeseci u okviru s popisom.
Korak 8: Sada u prozoru svojstava okvira liste odaberite stil linije kao " 1 - fmListStyleOption ".
Korak 9: Čim odaberete stil linije, odmah možete vidjeti utjecaj.
Korak 10: Pokrenite ovaj kôd vidjet ćete zasebno okvir s popisom.
Korak 11: Sada ćemo dodati makro kod za pohranu podataka koje je odabrao korisnik. Dvaput kliknite na okvir s popisom. Vidjet ćete zasebno ime makronaredbe poput dolje.
Private Sub Month_List_Box_Click () End Sub
Korak 11: Kad korisnik odabere mjesec, pohranit ćemo podatke u ćeliju G5. Kako biste pohranili unos koji je dao korisnik dodajte donji kôd.
Privatni podmesec_List_Box_Click () raspon ("G5"). Vrijednost = Month_List_Box.Value Kraj Pot
12. korak: Ako pokrenete kôd i odaberete neki od mjeseci, u ćeliji G5 možemo vidjeti vrijednost koju je odabrao korisnik.
Odabrao sam Jun, tako da mogu vidjeti Juna u ćeliji G5. Ovako možemo upotrijebiti okvir s popisom u vašim VBA projektima da bismo preuzeli doprinose od korisnika.
VBA popisni okvir - primjer br. 2
Metoda Add.Items za dodavanje vrijednosti u okvir za popis
Slijedite korake u nastavku kako biste stvorili okvir s popisom u VBA.
Korak 1: Stvorite novi korisnički obrazac. Evo ga UserForm2.
Korak 2: Dodajte okvir za popis u Userform 2.
Korak 3: Nakon umetanja okvira s popisom, navedite odgovarajuće ime ovom popisu u prozoru Svojstva, tj. Month_list_Box1 .
Korak 4: Sada u prozoru s svojstvima okvira liste odaberite stil linije kao " 1 - fmListStyleOption ".
Korak 5: Dvaput kliknite obrazac za korisnike. Vidjet ćete automatski umetnuti makronaredbu kao niže.
Private Sub UserForm_Click () Kraj Sub
Korak 6: Postavljanjem kursora unutar makronaredbe odaberite " Initialize ".
Korak 7: Čim odaberete "Initialize", možemo vidjeti novi makronaredbu koja će se stvoriti odmah ispod trenutne.
Private Sub UserForm_Initialize () Kraj Sub
Korak 8: Izbrišite staru makronaredbu. Pod UserForm inicijalizacijom napišite donji kôd za dodavanje predmeta u okvir za popis.
Private Sub UserForm_Initialize () Month_List_Box1.AddItem "Jan" Month_List_Box1.AddItem "Feb" Month_List_Box1.AddItem "Mar" Month_List_Box1.AddItem "Apr" Month_List_Box1.AddItem "May" Mesec_th__M___ _ _ _ _ _ _ _ _ maj__ _ _ _ _ _ _ _ _ maj__ __ _ _ _ _ _ _ _ _ _ _ _ _ _ maj_ _ _ _ _ _ _ _ _ _ _ maj__ maj__ _x_ _ _ _. "Aug" Month_List_Box1.AddItem "Sep" Month_List_Box1.AddItem "oct" Month_List_Box1.AddItem "Nov" Month_List_Box1.AddItem "Dec" Kraj Sub
Korak 10: Sada pritisnite F5 tipku za pokretanje koda i dobit ćete sljedeći izlaz.
Stvari koje treba zapamtiti
- Ako izravno dajete referencu na ćeliju, tada morate navesti naziv lista i referencu ćelije. (Trebate dodati usklični (!) Simbol ispred naziva lista).
- Također možete dodati stavke u okvir s pomoću metode Add.Item.
- Ako želite omogućiti korisniku da odabere više stavki, tada morate odabrati opciju " fmMultiSelectMult" u prozoru Multi-Select u prozoru Properties.
Preporučeni članci
Ovo je vodič za VBA List Box. Ovdje smo raspravljali o tome kako stvoriti List Box u Excelu i VBA, zajedno s praktičnim primjerima i preuzeti Excel predložak. Možete i pregledati naše druge predložene članke -
- Kako koristiti zamjenu VBA?
- Dodavanje okvira s popisom u Excelu
- Vodič za Excel VBA polja
- Excel padajući popis