Is there an easy way to combine say A1 to A5000 to B1 seaparated by comma ?
P Patrick Molloy Aug 22, 2003 #2 Sub combine() Dim text as string, i As Long For i = 1 To 5000 text = text & Cells(1, 1) Next [b1] = text End Sub PAtrick Molloy Microsoft Excel MVP
Sub combine() Dim text as string, i As Long For i = 1 To 5000 text = text & Cells(1, 1) Next [b1] = text End Sub PAtrick Molloy Microsoft Excel MVP
