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
For Each c In Range("a3:c7") ItemName = c.Text Next c
This will give you each cell one after the other.