VBA Combobox leere Zeilen nicht anzeigen?
Guten Tag zusammen,
ich habe eine Combobox, dessen Inhalt aus einem gewissen Bereich angezeigt werden soll. Jedoch möchte ich, dass in der Liste keine leeren Zellen angezeigt werden.
Infos:
Bereich: Blatt XY Range L3-102
Name ComboBox: KAnzeigename
Name UserForm: Schreiben
Es läuft unter "Private Sub UserForm_Initialize()". Die leeren Zellen (formatiert als Standard) aus dem Bereich L3-L102 laufen über eine Wenn-Funktion mit dem Ergebnis = ""
Wo ist den denn Fehler?
Sind es aufgrund der Wenn-Funktion keine leeren Zellen mehr?
Dim i As Long
With Schreiben.KAnzeigename
For i = 3 To 102
If Not IsEmpty(Sheets("XY").Cells(i, 12)) Then
.AddItem Sheets("XY").Cells(i, 12)
End If
Next
End With
Vielen Dank und Gruß