Combobox
14.08.2005 14:34:18
Peter
Ich habe noch eine kleine Frage, bei welcher Ihr mir sicher weiterhelfen könnt. Ich habe zwei Kombinationsfelder in meiner Tabelle. Im ersten Kombinationsfeld kann ich die Sprache auswählen. Nach Auswahl der Sprache erscheinen im zweiten Kombinationsfeld die passenden Einträge zu der entsprechenden Sprache. Hier mein Code:
Private Sub ComboBox1_Change()
If ComboBox1.Value = "D" Then
ComboBox2.ListFillRange = "Tabelle3!a1:a2"
Else
ComboBox2.ListFillRange = "Tabelle3!b1:b2"
If ComboBox1.Value = "E" Then
ComboBox2.ListFillRange = "Tabelle3!c1:c2"
End If
End If
End Sub
Das funktioniert alles wunderbar. Nur das im Kombinationsfeld2 erst die neuen Werte angezeigt werden, wenn ich es auf-oder zugeklappt habe. Das ist für den Benutzer verwirrend, da er nach der Sprachauswahl im Kombinationsfeld1 immer noch die letzten Einträge und nicht die neuen Einträge im Kombinationsfeld2 sieht.
Für Eure Hilfe danke ich Euch bestens.
Liebe Grüsse
Peter