warum funktioniert das einlesen einer Jahresreihe aus Spalte A in die ComboBox1 nicht. Nicht numerische Daten werden stattdessen eingelesen.
Private Sub UserForm_Initialize()
lRow = IIf(IsEmpty(Range("A65536")), Range("A65536").End(xlUp).Row, 65536)
On Error Resume Next
ComboBox1.AddItem "neu"
For iRow = 2 To lRow
col.Add Cells(iRow, 1), Cells(iRow, 1)
If Err = 0 Then
ComboBox1.AddItem Cells(iRow, 1)
Else
Err.Clear
End If
Next iRow
On Error GoTo 0
End Sub
Hat jemand eine Idee wie man das Problem lösen kann.Vielen Dank im Voraus. chandler