Hallo Leute,
ich verzweifle noch, kann sich einer meinen kleinen Code anschauen und mit nen Tip geben,
warum der Inhalt meines Steuerelements [Kombinationsfeld] leer bleibt?
Private Sub CB_Eigentuemer_DropButtonClick()
Dim zelle As Range
CB_Eigentuemer.Clear
For Each zelle In Worksheets("SD-Eigentümer").Cells(78, 5000)
If zelle.Value <> "" Then CB_Eigentuemer.AddItem zelle.Value
Next
End Sub
|