Simple form...........
In D131..............not D132!
=D132&D133&D134&D135 etc.
Not so simple form..............
=D132 $ " " D133 & " " & D134 etc.
Easy way.............use a UDF
Function ConCatRange22(CellBlock As Range, Optional Delim As String = "") _
As String
'entered as =concatrange22(a1:a10,", ") desired delimiter between quotes
'as written delimiter is comma space
Dim Cell As Range
Dim sbuf As String
For Each Cell In CellBlock.Cells
If Cell.text <> "" Then
sbuf = sbuf & Cell.text & Delim
End If
Next Cell
ConCatRange22 = Left(sbuf, Len(sbuf) - Len(Delim))
End Function
Paste the UDF to a General module in your workbook.
Gord Dibben MS Excel MVP