Bin wieder mal auf ein Problem gestossen, das meine vba-Kenntnisse überfordert.
Mittels nachfolgendem Makro weise ich der ComboBox16 den ersten Wert der ComboBox17 (hat 2 _
Spalten) zu. Soweit so gut.
Private Sub ComboBox17_Change()
Me.ComboBox17.SetFocus
a1 = Me.ComboBox17.ListIndex
Me.ComboBox16.Value = Me.ComboBox17.List(a1, 1)
End Sub
Wenn ich nun durch nachfolgendes Makro die Eingabe in ComboBox17 lösche, müsste auch der Wert in ComboBox16 wieder gelöscht werden - soweit meine Theorie.
Private Sub CommandButton3_Click()
ComboBox17.Clear
Call UserForm_Initialize
End Sub
Es erscheint jedoch der Lauftzeitfehler 381 "Eigenschaft List konnte nicht abgerufen werden. Index des Eigenschaftenfelds ungültig".
Ich habe bereits versucht, die ComboBox16 durch ein Textfeld zu ersetzen, hier kommt die selbe Meldung. Aus der Online-Hilfe werde ich leider nicht schlau.
Für einen Lösungsansatz wäre ich Euch sehr dankbar.
Beste Grüsse,
George