Eventhandler Combobox in Userfrom
29.12.2023 23:49:31
Robirob
ich hab folgendes Problem:
aus dem Worksheet "Objekte" wird in einem Userform die Combobox "cbObjekt" mit gefilterten Datensätzen gefüllt:
Private Sub cbObj_Initialize()
Dim raBereich As Range, raZelle As Range
Dim loLetzte As Long
With Worksheets("Objekte")
loLetzte = .Range("AA1")
Set raBereich = .Range(.Cells(2, 31), .Cells(loLetzte, 31))
For Each raZelle In raBereich.SpecialCells(xlCellTypeVisible)
Me.cbObjekt.AddItem raZelle.Value
Next raZelle
End With
End Sub
So weit, so gut.
Was mir nun nicht gelingt ist der Event-Handler und der VBA-Code, um den ausgesuchten Wert der Combobox auszulesen.
Wer kann helfen?
Besten Dank