AddItem nicht nach leerem Feld
Rainer
befülle eine ComboBox mit folgendem Code:
With Tabelle9.Columns(8)
Set rZelle = .Find(What:=Trim(ComboBox7.Value), LookAt:=xlWhole, LookIn:=xlValues)
If Not rZelle Is Nothing Then
sFundst = rZelle.Address
Do
ComboBox8.AddItem .Range("C" & rZelle.Row).Value
Set rZelle = .FindNext(rZelle)
Loop While Not rZelle Is Nothing And rZelle.Address sFundst
Else
End If
End With
Nun habe ich das Problem, dass mein Suchbegriff aufgrund Gliederung mehrmals vorhanden ist.
In meiner Suchspalte habe ich dann allerdings Leerzeilen.
Ist es mit AddItem auch möglich, nur ab dem ersten gefundenen Eintrag bis zur dann kommenden Leerzelle zu suchen?
Gruß
Rainer