Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Comboboxinhalt ohne leerzeilen füllen

Comboboxinhalt ohne leerzeilen füllen
25.02.2016 09:56:57
Erich
Hallo liebes forum,
wie kann ich mir die Combobox füllen lassen ohne leerzeichen?
wie kann ich mir die CBX ohne doppler anzeigen lassen? es kommt vor das der Name mehrmals erscheint aber er soll nur einmal den namen anzeigen
Danke

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Comboboxinhalt ohne leerzeilen füllen
25.02.2016 10:15:11
Rudi
Hallo,
etwa so:
Private Sub UserForm_Initialize()
Dim oListe As Object, r As Range
Set oListe = CreateObject("scripting.dictionary")
For Each r In Range(Cells(2, 1), Cells(Rows.Count, 1).End(xlUp))
If r  "" Then
oListe(r.Value) = 0
End If
Next r
ComboBox1.List = oListe.keys
End Sub
Die Quellliste ist in A
Gruß
Rudi
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige