Dim myText As String myText= Range(\"a3\").Text
Returns the formatted value in cell A3, but
myText= Range(\"a3:c7\").Text <
myText= Range(\"a3:c7\").Text
Make a collection and run through all the Areas of the range and collect the text into the collection.