Uporabniški obrazci za Excel - nasveti za Excel

Kazalo

Excel 97 je predstavil nove uporabniške obrazce. V angleščini me naučite, kako ustvariti in uporabljati polje s seznamom.

MrExcel je pred kratkim izpolnil aplikacijo po meri za enega od naših bralcev. V tej aplikaciji Excel bi uporabnik na list vnesel 150 podatkovnih točk za določeno številko dela.

1. S klikom na gumb se ta številka dela in s tem povezane vrednosti podatkov preda v bazo podatkov na Sheet2. To je bilo v redu, potem pa smo potrebovali način, da uporabnik prikliče zapis iz lista 2, da lahko pregleda vnose. Uporabniku sem hotel dovoliti, da odpre obrazec s spustnim poljem, ki prikazuje vse elemente na listu

2. Uporabnik se je lahko pomaknil, izbral element, nato pa bi te vrednosti potegnil s lista 2 na list 1.

Kot mnogi od vas sem tudi v Excelu 5.0 začel pisati makre Excel. Celoten urejevalnik makrov v Excelu 97 je nekoliko zastrašujoč. Za namig tega tedna vam bom korak za korakom pokazal, kako ustvarite polje s seznamom za ta projekt. Ta teden se osredotočamo samo na kombinirano polje. Ciljna skupina je nekdo, ki pozna osnove makrov Excel, vendar ni nikoli uporabil obrazca za interakcijo z makrom.

Prvi korak: Spremenil sem obstoječe makre, tako da bo makro, ko so dodali zapis na list2, poimenoval obseg, ki vsebuje številke delov, in ga poimenovati "Seznam del". V celici A1 je naslov, prvi element pa v celici A2. Ukaz End sem uporabil za iskanje zadnje vrstice:

LastRow = Range("A6000").End(xlUp).Row ActiveWorkbook.Names.Add Name:="PartList", RefersTo:="=Sheet2!$A$2:$A$" & LastRow

Drugi korak: postavite obrazec v polje s seznamom. Sledite tem korakom:

Zaženite urejevalnik Visual Basic, tako da pritisnete alt-F11
V meniju izberite Vstavi> Uporabniški obrazec. Urejevalnik vam mora dati prazen UserForm1.
Če v spodnjem levem kotu ne vidite polja Properties-UserForm1, pritisnite ikono »Properties Window« - videti je kot roka s prstom, ki kaže na bel list.
Četrti vnos v oknu lastnosti je Caption. Trenutno bo napis UserForm1. Kliknite okno desno od Caption v oknu Properties in vnesite nov naslov obrazca. Svojega sem poklical "Izberite številko dela za pregled". Vse druge lastnosti za obrazec sem pustil v privzetem stanju.
Ustvarjanje seznamskega polja z uporabniškim obrazcem
Ponovno kliknite kjer koli znotraj uporabniškega obrazca in prikaže se orodjarna Controls.
V orodnem polju Controls izberite črko A. Kliknite in povlecite, da ustvarite polje z oznakami na vrhu obrazca. Privzeto je napis Label1. Znova kliknite znotraj besedilnega polja in napis lahko uredite. Uporabniku dajte navodila tukaj: "Izberite element s spodnjega seznama in kliknite V redu, da pregledate vrednosti".
Kliknite obrazec, vendar zunaj polja z nalepkami in spet boste videli nadzorno orodje. 4. element v zgornji vrstici je kombinirano orodje. Kliknite to in povlecite v uporabniški obrazec, da ustvarite kombinirano polje. Tu se bo prikazal seznam številk delov. Privzeto ime je ComboBox1.
Lastnosti Comboboxa
Okno z lastnostmi vam bo zdaj prikazalo lastnosti za ComboBox1. Pomaknite se navzdol po lastnostih, dokler ne vidite lastnosti RowSource. Za lastnost RowSource vnesite = Sheet2! PartList
Zdaj lahko izvedete hitri test, da se prepričate, da stvari delujejo pravilno. Kliknite naslovno vrstico uporabniškega obrazca, da izberete celoten obrazec. Zdaj kliknite ikono "predvajaj" (izgleda kot gumb za predvajanje na videorekorderju). Vrnili se boste v svoj Excelov delovni zvezek in dobili boste naš preprost uporabniški obrazec. Če kliknete spustni meni s številko dela, se prikaže seznam veljavnih številk delov. Izberite enega in ostal bo v kombiniranem polju. Zaenkrat ne preveč razburljivo. Kliknite mali X v zgornjem desnem kotu, da zavrnete polje.
Vrnite se v urejevalnik Visual Basic. Kliknite uporabniški obrazec, da se prikaže Control Toolbox. Kliknite orodje CommandButton in narišite gumb. V oknu Properties - CommandButton1 spremenite napis v V redu.
Narišite drugi gumb in ga označite kot Prekliči.
Skoraj smo končali. Privežemo malo kode na gumb Prekliči. Z desno miškino tipko kliknite gumb Prekliči in izberite "Prikaži kodo". Urejevalnik bo nastavil vaše izjave Sub in End Sub. Med njimi vnesite eno vrstico kode:
```
UserForm1.Hide
```
Da, to je vse, kar je potrebno za dodelitev kode gumbu. Če se želite vrniti na uporabniški obrazec, dvokliknite besedo UserForm1 v oknu projekta. (Ne vidite okna projekta? Pritisnite ikono Project Explorer, tik na levi strani ikone Properties.)
Za dokončanje uporabniškega obrazca1 naredimo nekaj z gumbom V redu. Ko uporabnik klikne V redu, želim, da se vrednost iz seznamskega polja prikaže v celici sheet1 celice A2, nato pa želim sprožiti makro, ki sem ga prej napisal, imenovan ReviewItem. Z desno tipko miške kliknite gumb V redu in izberite Prikaži kodo. Vnesite to kodo za Private Sub CommandButton1_Click ():
```
Worksheets("Sheet1").Range("A2") = UserForm1.ComboBox1.Value UserForm1.Hide ReviewItem
```