Ich brauche wieder einml eure Hilfe.
Ich will in eine Combobox nur die Daten einlesen, die ich vorher über Autofilter
ausgewählt habe. Leider werden immer alle Daten eingelesen.
Ist das machbar, wer weiß Rat ?
Harry
Hi,
Option Explicit
Sub stantiv()
Dim anzahl As Integer, x As Variant
For anzahl = 1 To 60
If Not Rows(anzahl).Hidden Then
x = Sheets(1).Cells(anzahl, 187)
If x = "" Then Exit For
ComboBox1.AddItem (x)
End If
Next anzahl
End Sub
Mit freundlichen Grüßen Hubert