/ / Excel VBA-yhdistelmälaatikko

Excel-VBA-yhdistelmälaatikko

Yhdistelmäruutu on avattava luettelo, josta käyttäjä voi valita kohteen tai täyttää oman valintansa. Luo a yhdistelmälaatikko sisään Excel VBAsuorita seuraavat vaiheet.

1. Valitse Kehittäjä-välilehdessä Lisää.

2. Valitse ActiveX Controls -ryhmässä Combo Box.

Luo yhdistelmäruutu Excel VBA: ssa

3. Vedä yhdistelmäruutu työkopioosi.

Vedä yhdistelmälaatikko

Huomautus: voit muuttaa ohjaimen nimeä napsauttamalla ohjausta hiiren kakkospainikkeella (varmista, että Suunnittelutila on valittuna) ja napsauttamalla sitten Ominaisuudet. Nyt jätämme ComboBox1: n yhdistelmäruudun nimeksi.

Luo työkirjan avoin tapahtuma. Excel VBA suorittaa Excelin VBA-työkalun lisättävän koodin, kun avaat työkirjan.

4. Avaa Visual Basic -editori.

5. Kaksoisnapsauta tätä työkirjaa Project Explorerissa.

6. Valitse työkirja vasemmasta avattavasta luettelosta ja valitse avattavasta oikeasta avattavasta luettelosta Avaa.

Työpöytä Avaa Tapahtuma Excel VBA: ssa

7. Voit lisätä kohteita yhdistelmäruutuun Työpöytä Avaa -toiminnolla seuraavat koodiluokat:

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

Huomautus: käytä Sheet2 -ohjelmaa, jos yhdistelmälaatikko sijaitsee toisessa laskentataulukossa, Sheet3, jos yhdistelmäruutu on kolmannessa laskentataulukossa jne. Jos käytät näitä koodiriviä Workbook Open -työkalun ulkopuolella, saatat haluta lisätä alla olevat koodiluokat ennen näitä koodi riviä. Ensimmäinen koodirivi poistaa yhdistelmäruudun. Tällä tavalla kohteita ei voitu lisätä useita kertoja, jos suoritat koodisi useammin kuin kerran. Toinen koodirivi poistaa oman valintasi.

ComboBox1.Clear
ComboBox1.Value = ""

8. Jos haluat yhdistää tämän yhdistelmäruudun soluun, napsauta hiiren kakkospainikkeella yhdistelmäruutua (varmista, että suunnittelutapa on valittu) ja napsauta Ominaisuudet. Täytä D2 LinkedCellille.

LinkedCell

Huomaa: myös ListFillRange-ominaisuuden täyttää yhdistelmäruutu useilla soluilla.

9. Tallenna, sulje ja avaa Excel-tiedosto uudestaan.

Tulos:

Yhdistelmälaatikko

Vaikka joissakin tilanteissa voi olla hyödyllistä sijoittaa yhdistelmäruutu suoraan laskentatauluun, yhdistelmäruutu on erityisen hyödyllinen, kun se asetetaan Userform-muotoon.

Lue myös: