/ / Excel VBA List Box

Excel VBA List Box

A lista mező olyan lista, ahonnan a felhasználó választhat egy elemet. A lista mezőbe ban ben Excel VBAhajtsa végre a következő lépéseket.

1. A Fejlesztő lapon kattintson a Beszúrás gombra.

2. Az ActiveX-vezérlők csoportban kattintson a Lista mezőre.

Hozzon létre egy listát az Excel VBA-ban

3. Húzzon egy listát a munkalapon.

Húzzon egy lista dobozt

Jegyzet: megváltoztathatja a vezérlő nevét a jobb egérgombbal történő kattintással (győződjön meg róla, hogy a Tervezési mód van kiválasztva), majd kattintson a Tulajdonságok gombra. Most a ListBox1-et hagyjuk a listás mező neveként.

Munkafüzet nyitott esemény létrehozása. A Munkafüzet megnyitott eseményhez hozzáadott kódot az Excel VBA fogja végrehajtani a munkafüzet megnyitásakor.

4. Nyissa meg a Visual Basic Editor alkalmazást.

5. Kattintson duplán a Work Explorer-re a Project Explorerben.

6. Válassza ki a Munkafüzetet a bal oldali legördülő listából, és válassza a Megnyitás lehetőséget a megfelelő legördülő listából.

Munkafüzet megnyitása az Excel VBA programban

7. Elemek hozzáadásához a listában adja meg a következő kódsorokat a Munkafüzet megnyitott eseményhez:

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

Jegyzet: akkor használja a Sheet2 lapot, ha a listád a második munkalapon található, a 3. lap, ha a listád a harmadik munkalapon található stb. Ha ezeket a kódsorokat a Munkafüzet megnyitása eseményen kívül használja, előfordulhat, hogy ezeket a kódsorok. Ez a kódsor törli a listát. Így az elemek többször is hozzáadódnak, ha többször is végrehajtja a kódot.

ListBox1.Clear

8. Ha ezt a listát a cellához szeretné csatlakoztatni, kattintson jobb gombbal a listán (győződjön meg róla, hogy a tervezési mód van kiválasztva), majd kattintson a Tulajdonságok gombra. Töltse ki a D3-at a LinkedCell-hez.

LinkedCell

Megjegyzés: a ListFillRange tulajdonságot egy cellatartomány kitöltésével is láthatja.

9. Mentse el, zárja be és indítsa újra az Excel fájlt.

Eredmény:

List Box

Bár egyes esetekben hasznos lehet egy listatáblát közvetlenül elhelyezni a munkalapon, a listázó doboz különösen hasznos, ha Userformon kerül elhelyezésre.

Szintén olvasható: