Hi,
Why do I get the error with this

Sub test()

Range("B1", "B2").Value = Chr(34) & Range("A1", "A2").Value & """"

End Sub

Type mismatch. I am trying to take all data in one column and apply double
quotes and put it in a second column.

Thanks