Combobox keuzes

[weusty]

wat doe ik hier fout?

If cboDag = "01" Then cboMaand = .Additem "'December"
If cboDag = "01" Then cboMaand = .Additem "'November"

Ik wil dus als er iemand bij cboDag '01' kiest dat je bij cboMaand alleen maar 'December' en 'November' kan kiezen

iemand een idee?

Wil dit eigelijk gaan gebruiken met klant gegevens.

Als iemand dan bijvoorbeeld bij klant ANWB kiest dat hij dan bij postadres alleen nog maar de mogelijkheden heeft een adres van de ANWB uittekiezen en niet van alle andere klanten zoals nu het geval is.

M.v.g. Weust

 

[Tardis]

Hallo Weust,

kun je doen door 2 keuzelijsten te gebruiken, waarbij je de 2e afhankelijk maakt van de 1e.
En dat kun je doen door de waarde die je kiest in je 1e keuzelijst op te nemen als konditie in je 2e keuzelijst.
En dat doe je in de RowSource van je 2e keuzelijst.

Groet,

Tardis

 

[weusty]

dankje, ga het proberen

 

[weusty]

Heb het geprobeerd,

maar wat moet ik daar nu voor een waarde invullen om cboMaand afhanelijk te maken van cboDag. Als ik bij eigenschappen van cboMaand 'cboDag' invul komt de melding 'kan de eigenschap RowSource niet invullen, ongeldige eigenschappenwaarde'"

Wat voor een waarde dient hier ingevult te worden?

 

[Tardis]

Zoek even in het forum, onderwerp is al vrij vaak behandeld.

Groet,

Tardis

 

[weusty]

Kom er maar niet uit

Ik heb veel gezocht op dit en andere forums maar kan eigelijk niks nuttigs vinden. Heeft iemand een voorbeeld, of kan iemand een voorbeeld voor mij maken.

het moet dus zo iets zijn.

1e Combobox met daarin de keuze uit bijvoorbeeld: Automerken

Alfa Romeo
Ford
Opel
Volkswagen

2e Combox met daarin de keuze uit de types
Dus als Volkswagen bij 1 is geselecteerd dan alleen de Volkswagen types weergeven als Polo, Golf, Bora, Passat, Transporter, Caddy, Beetle, Sharran enz.

of als iemand een goed link heeft of andere handige info is natuurlijk ook van harte welkom


Het gaat trouwns om een word bestand.
Dank voor de moeite.

Koen

 

[Axel Hagg]

Dag Koen,

Ik hou niet van auto's dus ik geef een ander voorbeeld:

Combo1.AddItem "Fruit"
Combo1.AddItem "Groente"

Als je een selectie maakt in de eerste combobox dan laat je dat volgen door onderstaande code:

If Combo1.Text = "Fruit" Then
Combo2.AddItem "Appel"
Combo2.AddItem "Peer"
Combo2.AddItem "Kers"
Else
Combo2.AddItem "Andijvie"
Combo2.AddItem "Spinazie"
Combo2.AddItem "Sperciebonen"
End If

Gegroet,

Axel.

 

[weusty]

gaat toch iets fout

Private Sub UserForm_Initialize()

cboDag.AddItem "01"
cboDag.AddItem "02"

If cboDag.Text = "01" Then
cboMaand.AddItem "neenee"
Else
cboMaand.AddItem "jaja"
End If

End Sub

als ik nou in cboDag "01" selecteer dan kan ik alleen maar "jaja" bij cboMaand selecteren. En als ik "02" kies ook alleen maar "jaja"

Wat doe ik fout?

 

[Axel Hagg]

Dag Weusty ,

Private Sub UserForm_Initialize()
  cboDag.AddItem "01"
  cboDag.AddItem "02"
End Sub

Private Sun Combo1_Click
If cboDag.Text = "01" Then cboMaand.AddItem "neenee" Else cboMaand.AddItem "jaja"
End If

Zo lukt het wel

Gegroet,

Axel

 

[Theknurt]

Dag Weusty ,

Private Sub UserForm_Initialize()
  cboDag.AddItem "01"
  cboDag.AddItem "02"
End Sub

Private Sun Combo1_Click
If cboDag.Text = "01" Then cboMaand.AddItem "neenee" Else cboMaand.AddItem "jaja"
End If

Zo lukt het wel

Gegroet,

Axel

Private Sub UserForm_Initialize()
  cboDag.AddItem "01"
  cboDag.AddItem "02"
End Sub

Private Sun Combo1_Click
CboMaand.Clear
If cboDag.Text = "01" Then cboMaand.AddItem "neenee" Else cboMaand.AddItem "jaja"
End If

Zou ik ervan maken. CboMaand.Clear wist in iedergeval de eerder opgebouwde lijst, elke keer weer.

Suc6 Bart

 

[weusty]

ah super, zal het gaan proberen!!!

dank dank dank :thumb: :thumb: :thumb: :thumb: :thumb:

 

[weusty]

Het lukt, dank u