Hi,

I'm filling a combobox with 10 columns, it works fine.
Now I need to add a new column, so I set

..ColumnCount = 10, and here it crashes.


If Len(Trim(rsINVOICES.Fields(10).Value)) 0 Then
.List(.ListCount - 1, 10) = (rsINVOICES.Fields(10).Value) '
<- value is 6055
Else
.List(.ListCount - 1, 10) = " "
End If