ich lasse beim Starten der Userform eine Combobox füllen.
Später möchte ich einen Wert in die selbe Combobox geben. Hierbei kommt der Laufzeitfehler 380 (unzulässige Verwendung der value Eigenschaft).
Nun versuche ich meinen Wert mit dem Inhalt der Combobox zu vergleichen.
Hierzu verwende ich diesen Code...
Sub test()
For a = 0 To ComboBox26.ListCount
Debug.Print ComboBox26.List(a) & " / " & Sheets("Kontaktdaten").Cells( _
rngName.Row, 4).Text
If ComboBox26.List(a) = Sheets("Kontaktdaten").Cells(rngName.Row, 3). _
Text Then
ComboBox26.Value = ComboBox26.List(a)
Debug.Print "Eintrag in Combobox durchgeführt"
Exit For
End If
Next a
End Sub
Ohne einen ErrorHandler funktionierts gar nicht und der Vergleich funktioniert auch nicht, obwohl der gesuchte Wert in der Combobox enthalten ist.Könnte mir hier jemand weiterhelfen?
Gruß
A.