wie kann ich eine Spalte in eine ComboBox einlesen ohne doppelte Einträge zu haben. Es sollte so funktionieren wie bei den Autofiltern. Hat jemand eine Idee?
Vielen Dank,
DetlefD
Vielen Dank,
DetlefD
'Alle Werte in Spalte A bis EndePrivate Sub UserForm_Initialize()
Dim col As New Collection
Dim iRow As Integer
iRow = 1
On Error Resume Next
Do Until IsEmpty(Cells(iRow, 1))
col.Add Cells(iRow, 1), Cells(iRow, 1)
If Err = 0 Then
ComboBox1.AddItem Cells(iRow, 1)
Else
Err.Clear
End If
iRow = iRow + 1
Loop
On Error GoTo 0
ComboBox1.ListIndex = 0
End Sub
Gruß
Lutz
ja, es gibt Code im Internet, um doppelte Einträge von Arrays mittels VB zu filtern. Danach kannst Du das zurückgegebene Feld in eine Box einlesen.
Gruß
Micha
Gruß,
Detlef
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen