celladd = Cells(2, 6)
Range(celladd).Copy
Worksheets("sheet2").Paste
Have you tried it, I did with a simple formula that concatenated 4 cells, with letters in two and numbers in two and included a ":" betwen them and it worked fineI do not think that will work?
arr = Array(1, 4, 6, 8, 10, 203)
outarr = Array(1, 2, 3, 4, 5, 6)
addres = "not found"
inpt = Cells(2, 1)
For i = 0 To 5
If inpt = arr(i) Then
Cells(outarr(i), 10) = "output"
End If
Next i