Run time Error 13: type mismatch

[DineshPawar]

Sub DD()

Dim celldata As String

celldata = ""


For j = 2 To 9

celldata = celldata + Cells(3, j) + " "

Next

End Sub


'''value in the 3rd row is 2,4,bi,33,33,55,56,777,ss

[cytop]

A marvel of brevity... Time must be an expensive commodity.

You cannot Add strings, use Concatenate (&)