Combobox lässt Einträge zu...soll aber nicht
KLE
...ich versuche nun seit Stunden einer Combobox zu vermitteln, dass Sie nur Einträge zulassen darf, welche in ihrem Bereich (List) vorhanden sind. Dazu habe ich für die Listbox -objCBListe- folgende Eigenschaften gesetzt:
MatchEntry = fmMatchEntryComplete
MatchRequired = True
und als Style: fmStyleDropDownCombo
Damit der User schon etwas eingeben kann, aber er soll eben nur das eingeben können, was auch in der Liste ist. Sobald es nicht vorhanden ist - soll der User es merken und die Combobox soll nicht verlassen werden können, bis er einen korrekten Begriff eingeben hat.
Komme hier aber eben nicht weiter - da die Einstellungen unter Eigenschaften der Combobox da nicht wirklich etwas tun...
Unter der Verwendung des anderen Style, als Liste geht es zwar, aber dann kann der User nichts mehr eingeben... ;o(
So lade ich den Bereich in die Combobox ein:
Private Sub FillListe()
LZeile = Worksheets("ListeA").Cells(Rows.Count, 1).End(xlUp).Row
With objCBListe
.ListFillRange = "ListeA!C5;C" & LZeile
End With
End Sub
Kay
Anzeige