Concatenate values with '"

[nischal4487]

Hi,
I have columns with values a b c d etc, and i have to bring them all to one cell with a comma(,) after each of the values in the cell.
Please help on this.

Regards,
Nik

 

[lrobbo314]

How about this. Use the function like a regular Excel function. It takes 2 arguments. The first is the range of cells and the second is the delimiter.

Function TEXTJOIN(r As Range, del As String) As String
Dim AR(): AR = r.Value


TEXTJOIN = Join(Application.Transpose(AR), del)
End Function

 

[Sanjeev1976]

Hi Nik,

You can try :

=TEXTJOIN(",",,A1:C1)

modify as required the range