Odvisne kombinirane škatle

Spodaj si bomo ogledali program v Excel VBA ki ustvari obliko uporabnika, ki vsebuje odvisna kombinirana polja . Uporabniška oblika, ki jo bomo ustvarili, izgleda tako:

Uporabnik na spustnem seznamu izbere Živali. Posledično lahko uporabnik izbere žival na drugem spustnem seznamu.

Uporabnik na spustnem seznamu izbere šport. Posledično lahko uporabnik na drugem spustnem seznamu izbere šport.

Če želite ustvariti ta uporabniški obrazec, izvedite naslednje korake.

1. Odprite Urejevalnik Visual Basic . Če Project Explorer ni viden, kliknite View, Project Explorer.

2. Kliknite Vstavi, Uporabniški obrazec. Če se orodjarna ne prikaže samodejno, kliknite Pogled, Orodjarna. Zaslon je treba nastaviti tako, kot je prikazano spodaj.

3. Dodajte kombinirana polja (najprej levo, drugo desno) in ukazni gumb. Ko je to končano, mora biti rezultat skladen s sliko uporabniškega obrazca, prikazano prej. Na primer, ustvarite kontrolnik kombiniranega polja s klikom na ComboBox v orodjarni. Nato lahko povlečete kombinirano polje na Userform.

4. Lahko spremenite imena in napise kontrolnikov. Imena se uporabljajo v kodi Excel VBA. Napisi so tisti, ki se prikažejo na zaslonu. Dobra praksa je, da spremenite imena kontrol, vendar to ni potrebno, ker imamo v tem primeru le nekaj kontrol. Če želite spremeniti napis Userform in ukazni gumb, kliknite Pogled, okno Lastnosti in kliknite na vsak kontrolnik.

5. Če želite prikazati obliko uporabnika, postavite a ukazni gumb na delovnem listu in dodajte naslednjo kodno vrstico:

Zdaj bomo ustvarili Sub UserForm_Initialize. Ko uporabite metodo Show za Userform, se bo ta podprogram samodejno izvajal.

6. Odprite Urejevalnik Visual Basic .

7. V Raziskovalcu projekta z desno tipko miške kliknite UserForm1 in nato kliknite Ogled kode.

8. Na levem spustnem seznamu izberite Userform. Na desnem spustnem seznamu izberite Inicializiraj.

excel formule za datume med dvema datumoma

9. Dodajte naslednje kodne vrstice:

Pojasnilo: Te kodne vrstice zapolnijo prvo kombinirano polje.

Zdaj smo ustvarili prvi del Userform. Čeprav že izgleda lepo, se ne bo nič zgodilo, ko izberemo element iz prvega kombiniranega polja.

10. V Project Explorerju dvokliknite UserForm1.

11. Dvokliknite prvo kombinirano polje.

12. Dodajte naslednje kodne vrstice:

Pojasnilo: Excel VBA uporablja vrednost indeksa spremenljivke za preizkus vsakega naslednjega stavka Case, da preveri, s katerimi postavkami je treba zapolniti drugo kombinirano polje. Pojdite skozi našo Izberite Primer program, če želite izvedeti več o strukturi Select Case.

13. Dvokliknite gumb Uvozi.

14. Dodajte naslednjo kodno vrstico:

Rezultat: