>>>dimension .aRowSource[ALEN(.aRowSource,1)+1, m.lnCols] && add one more column
>at this instruction you are adding one more row instead of column. If you need other column change the code:
>dimension .aRowSource[ALEN(.aRowSource,1), m.lnCols+1] && add one more column

I see, good catch <g> It's a typo in the comment, I should have said "add one more row".

Anyway, this has nothing to do with the problem, do you see anything else wrong?