bin Gestern vor diesem Problem gestanden und habs nicht gelöst bekommen, vielleicht kommt ja Heute einer von Euch drauf...
Also, sieht wie folgt aus:
Private Sub UserForm_Initialize()
ComboBox2.AddItem "alle"
ComboBox2.AddItem "mit"
ComboBox2.AddItem "ohne"
End Sub
Private Sub ComboBox2_Change()
ComboBox3.Clear
ComboBox3.AddItem "alle"
If Cells(1, 2) = "ohne" Then
ComboBox3.AddItem "200"
ElseIf Cells(1, 2) = "mit" Then
ComboBox3.AddItem "105"
ElseIf Cells(1, 2) = "alle" Then
ComboBox3.AddItem "105"
ComboBox3.AddItem "200"
End If
Me.Repaint
DoEvents
End Sub
Es ist leider so, dass die CB3 nicht richtig geladen wird,d.h. die Combobox3 wird immer mit einer 'Verzögerung' geladen; ich wähle :
1. CB2: mit--- CB3:---alle, 105
2. CB3: ohne - CB3:---alle, 105
3. CB2: mit ---CB3:---alle, 200
...
wie erreiche ich nun, dass sofort nach einer Veränderung in CB2 die entsprechenden Werte in CB3 zu Verfügung stehen?
ich habs zur besseren Veranschulichung mal hochgeladen
https://www.herber.de/bbs/user/5278.xls