Filling a Combobox 10 th column

[Guest]

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

 

[Tim]

What's the error message ?

Tim

 

[Guest]

Read the help on columncount. You are limited to 10 columns unless you bind
the control to the worksheet.

Here is the quote from the help file:

"For an an unbound data source, there is a 10-column limit (0 to 9)."

 

[Guest]

Tom,

Thanks for your help.

I'm sorry I didn't see it, because I had to travel these dates.

I appreciate your help.