/ / Kombinovaná schránka programu Excel VBA

Kombinovaná schránka Excel VBA

Rozbaľovací zoznam je rozbaľovací zoznam, z ktorého môže používateľ vybrať položku alebo vyplniť svoj vlastný výber. Ak chcete vytvoriť poľa so zoznamom v Excel VBA, vykonajte nasledujúce kroky.

1. Na karte Vývojár kliknite na položku Vložiť.

2. V skupine ActiveX Controls kliknite na Combo Box.

Vytvorte zoznam so zoznamom v programe Excel VBA

3. Na pracovnom hárku potiahnite pole so zoznamom.

Presuňte kombinovanú poštu

Poznámka: môžete zmeniť názov ovládacieho prvku kliknutím pravým tlačidlom myši na ovládací prvok (presvedčte sa, či je vybratý režim návrhu) a potom kliknutím na položku Vlastnosti. Pre túto chvíľu opustíme ComboBox1 ako názov poľa so zoznamom.

Vytvorte udalosť Otvorte zošit. Kód pridaný k udalosti Otvorenie zošita bude spustený programom Excel VBA pri otvorení zošita.

4. Otvorte Editor jazyka.

5. Dvakrát kliknite na tento zošit v programe Project Explorer.

6. V ľavom rozbaľovacom zozname vyberte zošit a zvoľte položku Otvoriť v pravom rolovacom zozname.

Otvorte udalosť v programe Excel VBA

7. Ak chcete pridať položky do zoznamu so zoznamom, pridajte do pracovnej knihy otvorené udalosti nasledujúce riadky kódu:

With Sheet1.ComboBox1
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

Poznámka: použite Sheet2, ak je vaše pole so zoznamom umiestnené na druhom pracovnom hárku, Sheet3, ak je vaše pole so zoznamom umiestnené na treťom pracovnom hárku atď. Ak použijete tieto riadky kódu mimo udalosti Workbook Open, možno budete chcieť pridať riadky kódové riadky. Prvý riadok kódu vymaže pole so zoznamom. Týmto spôsobom sa vaše položky nebudú pridávať viackrát, ak spustíte kód viac ako raz. Druhý riadok kódu vymaže vašu vlastnú voľbu.

ComboBox1.Clear
ComboBox1.Value = ""

8. Ak chcete prepojiť toto pole so zoznamom na bunku, kliknite pravým tlačidlom myši na pole so zoznamom (uistite sa, že je zvolený režim návrhu) a kliknite na položku Vlastnosti. Vyplňte D2 pre LinkedCell.

LinkedCell

Poznámka: tiež vidieť vlastnosť ListFillRange vyplniť rozbaľovacie pole s rozsahom buniek.

9. Uložte, zatvorte a znovu otvorte súbor programu Excel.

výsledok:

Kombinované pole

Hoci v niektorých situáciách môže byť užitočné umiestniť na pracovný hárok pole so zoznamom, pri umiestnení na Userform je veľmi užitočné.

Tiež si prečítajte: