Solved: concatenate cells in IF statements

[lienlee]

Actually I think it should be

[vba]

Serial = Cells(1, 2).Text
Cells(i, 1).Value = Cells(i, 1).Value & Cells(1, 2).Text & ","

'etc
[/vba]

Probably at the end a

[vba]
Cells(i, 1).Value = left(Cells(i, 1).Value, Len(Cells(i, 1).Value)-1)
[/vba]

to get rid of the last comma

Paul

Thanks! This was exactly what I was looking for. I was looking for how to get rid of the commas.

@xld. Thanks for your help also.