Wie kann ich eine Combobox in VBA mit Werten füllen?

...komplette Frage anzeigen

1 Antwort

Du kannst die Eigenschaft Sichtbar der Zeile abfragen und damit prüfen, ob sie im Filter ausgeblendet ist. Beispielsweise:

Sub formladen()
For i = 1 To Cells(Rows.Count, 2).End(xlUp).Row
If Cells(i, 2).Value <> "" And Rows(i).Hidden = False Then UserForm1.ComboBox1.AddItem (Cells(i, 2).Value)
Next
UserForm1.Show
End Sub

Hier wird auf die Spalte B eingelesen.

Was möchtest Du wissen?