Yritän tehdä rahtilaskuria Excelillä siten, että Combox1:stä valittaisiin ensin lähtömaa ja tämän perusteella Combobox2:een tulisi vaihtoehdoiksi kyseisen maan postinumerovaihtoehdot. Miten tällaisen tekeminen käytännössä onnistuu? Nyt saan kyllä maat näkymään ihan ok, mutta vaikka valitsen esim. Ranskan, niin näkyviin tulee myös kaikkien muiden maiden postinumerot. Toivottavasti joku osaa auttaa.
Combobox
JS
5
181
Vastaukset
esim. A sarakkeessa maat ja combobox1 ListFillRangeksi esim A1:A10
B -K sarakkeissa sitten kunkin maan omat postinumerot omissa sarakkeissaan allekkain
Nimeä kunkin maan postinumeroalue maalaamalla numerot ja kirjoita maan nimi nimiruutuun ja ENTER
VB- työkaluvalikosta lisää kaksi comboboxia ...
kopioi koodi taulukon moduuliin ja muuta combonimet sopiviksi
Option Explicit
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex > -1 Then
With ComboBox2
.ListFillRange = ComboBox1
.ListIndex = 0
End With
End If
End Sub
Keep EXCELing
@Kunde- JS
Kiitos vastauksesta! Toimii hyvin.
- JS
Jatkokysymys tähän: miten pystyn viittaamaan phaussa comboboxiin. Esim kun olen valinnut maan ja postinumeron, niin miten saan viitattua tuohon käyttäessäni PHAKUa?
Listboxin ominaisuuksissa laita LinkedCell solun osoite, jota käytät PHAKU funktiossa
- JS
Kiitos paljon neuvoista! Sain laskurin toimimaan :)
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Useita puukotettu Tampereella
Mikäs homma tämä nyt taas on? "Useaa henkilöä on puukotettu Tampereen keskustassa kauppakeskus Ratinan lähistöllä." ht2694921Kuka rääkkää eläimiä Puolangalla?
Poliisi ampui toistakymmentä nälkiintynyttä eläintä Puolangalla Tilalta oli ollut karkuteillä lähes viisikymmentä nälkii893404- 423308
- 502599
Meneeköhän sulla
oikeasti pinnan alla yhtä huonosti kuin mulla? Tai yhtä huonosti mutta jollain eri tyylillä? Ei olisi pitänyt jättää sua451817- 971630
Lähetä terveisesi kaipaamallesi henkilölle
Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘971428- 131295
PS uusimman gallupin rakettimainen nousija
https://yle.fi/a/74-20170641 Aivan ylivoimaisesti suurin kannatuksen nousu PS:lle. Nousu on alkanut ja jatkuu 2 vuoden1441035- 701027