Používateľské formuláre pre Excel - tipy pre Excel

Obsah

Excel 97 predstavil nové používateľské formuláre. V angličtine ma naučte, ako vytvoriť a používať zoznam.

MrExcel nedávno dokončil vlastnú aplikáciu pre jedného z našich čitateľov. V tejto aplikácii Excel by používateľ zadal 150 údajových bodov pre konkrétne číslo dielu na hárku.

1. Kliknutím na tlačidlo sa toto číslo dielu a súvisiace hodnoty údajov prenesú do databázy na hárku2. To bolo v poriadku, ale potom sme potrebovali spôsob, ako si užívateľ môže vyvolať záznam z hárku 2, aby mohol skontrolovať záznamy. Chcel som umožniť používateľovi otvoriť formulár s rozbaľovacím zoznamom zobrazujúcim všetky položky na hárku

2. Používateľ mohol listovať, vybrať položku a potom by som tieto hodnoty vytiahol z hárku 2 až do hárku 1.

Ako mnohí z vás, aj ja som začal písať makrá programu Excel v programe Excel 5.0. Celý tento editor makier v programe Excel 97 je trochu zastrašujúci. Ako tip na tento týždeň vám krok za krokom ukážem, ako vytvoriť zoznam pre tento projekt. Tento týždeň sa zameriame iba na rozbaľovaciu ponuku. Cieľovou skupinou je niekto, kto vie základné makrá programu Excel, ale nikdy nepoužil formulár na interakciu s makrom.

Prvý krok: Zmenil som existujúce makra tak, že keď pridali záznam do hárka2, makro pomenovalo rozsah obsahujúci čísla dielov názvom „PartList“. V bunke A1 je nadpis a prvá položka v bunke A2. Použil som príkaz End na nájdenie posledného riadku:

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

Druhý krok: Rozloženie formulára so zoznamom. Nasleduj tieto kroky:

Spustite editor jazyka Visual Basic stlačením klávesu alt-F11
Z ponuky vyberte Vložiť> Formulár používateľa. Editor by vám mal dať prázdny UserForm1.
Ak nevidíte pole Properties-UserForm1 v ľavom dolnom rohu, stlačte ikonu „Okno vlastností“ - vyzerá to ako ruka s prstom smerujúcim na biely list.
Štvrtá položka v okne vlastností je Titulok. Momentálne bude titulkom UserForm1. Kliknite na pole napravo od titulku v okne Vlastnosti a zadajte nový názov formulára. Zavolal som dolu „Vyberte číslo dielu na kontrolu“. Všetky ostatné vlastnosti formulára som nechal v predvolenom stave.
Vytvorenie zoznamu pomocou Userform
Znova kliknite kdekoľvek vo vnútri používateľského formulára a zobrazí sa panel nástrojov Ovládacie prvky.
Na paneli nástrojov Ovládacie prvky vyberte písmeno A. Kliknutím a ťahaním vytvorte pole štítku v hornej časti formulára. Predvolene má mať titulok Label1. Opätovným kliknutím do textového poľa môžete titulok upraviť. Tu zadajte pokyny pre používateľa: „Vyberte položku zo zoznamu nižšie a kliknutím na tlačidlo OK skontrolujte hodnoty.“
Kliknite na formulár, ale mimo poľa štítku a znova sa zobrazí ovládací panel. Štvrtá položka v hornom riadku je nástroj so zoznamom. Kliknite na toto a potiahnutím do formulára používateľa vytvorte rozbaľovacie pole. Tu sa zobrazí zoznam čísel dielov. Predvolený názov je ComboBox1.
Vlastnosti Comboboxu
V okne vlastností sa teraz zobrazia vlastnosti pre ComboBox1. Posúvajte sa nadol po vlastnostiach, kým sa nezobrazí vlastnosť Zdroj řádkov. Pre vlastnosť Zdroj riadkov zadajte = Sheet2! PartList
Teraz môžete spustiť rýchly test, aby ste sa ubezpečili, že veci fungujú správne. Kliknite na záhlavie formulára používateľa a vyberte celý formulár. Teraz kliknite na ikonu „prehrať“ (vyzerá to ako tlačidlo prehrávania na vašom videorekordéri). Vrátite sa do svojho zošita programu Excel a získate náš jednoduchý používateľský formulár. Ak kliknete na rozbaľovaciu ponuku čísel dielov, mal by sa zobraziť zoznam platných čísel dielov. Vyberte jednu a tá zostane v rozbaľovacom poli. Zatiaľ nie príliš vzrušujúce. Kliknutím na malé X v pravom hornom rohu okno zrušíte.
Vráťte sa do editora jazyka Visual Basic. Kliknutím na formulár používateľa zobrazíte ovládací panel nástrojov. Kliknite na nástroj CommandButton a nakreslite tlačidlo. Pomocou okna Vlastnosti - CommandButton1 zmeňte titulok tak, aby bol v poriadku.
Nakreslite druhé tlačidlo a označte ho Zrušiť.
Sme skoro hotoví. Naviažme trochu kódu na tlačidlo Zrušiť. Pravým tlačidlom myši kliknite na tlačidlo Zrušiť a vyberte možnosť „Zobraziť kód“. Editor nastaví vaše výpisy Sub a End Sub. Medzi ne zadajte jeden riadok kódu:
```
UserForm1.Hide
```
Áno, to je všetko, čo je k priradeniu kódu k tlačidlu. Ak sa chcete vrátiť späť k používateľskému formuláru, dvakrát kliknite na slová UserForm1 v okne projektu. (Nevidíte okno projektu? Kliknite na ikonu Prieskumník projektu, úplne naľavo od ikony Vlastnosti.)
Aby sme dokončili používateľa form1, urobme niečo s tlačidlom OK. Keď používateľ klikne na OK, chcem, aby sa hodnota zo zoznamu zobrazila v bunke A2 sheet1, a potom chcem naštartovať makro, ktoré som predtým napísal s názvom ReviewItem. Pravým tlačidlom kliknite na tlačidlo OK a vyberte možnosť Zobraziť kód. Zadajte tento kód pre Private Sub CommandButton1_Click ():
```
Worksheets("Sheet1").Range("A2") = UserForm1.ComboBox1.Value UserForm1.Hide ReviewItem
```