Table 1       Table 2
1               1      a
2               1      b
3               1      c

I want to concatenate a b c onto a single details line for the value in Table 1.

This is as far as I got but the array only ever returns 1 value and so the loop never works.


    Dim arrTestodes
    arrTestodes = array({Table2.Column2})

    Dim i
    Dim stringoftests
    i = 1

    Do while i <= ubound(arrTestodes)
        if i < 2 then
            stringoftests = totext(arrTestodes(i))
        else
            stringoftests = stringoftests + ", " + ToText(arrTestodes(i))
        end if
    i = i + 1
    Loop
    formula = stringoftests


Where am I going wrong?

Thanks very much for the respnse.

Please can you add a bit more meat to your answer, I'm not 100% on what I need to do.

Thanks

James :-)

If your data is coming sorted with groupings, you can use the "NEXT" function in a formula.