I just realized what this statement of your really does:
Code:
Split(.Cell(Row, Column).Range.Text, vbCr)(0)
I tried reading the contents of a cell using this code:
Code:
.Cell(Row, Column).Range.Text
I was surprised to discover that there are two extra characters at the end of the string: x'13' and x'07'. The first is a carriage return, which I was a little surprised to find in a cell, but then I remembered that that's where Word stores all the paragraph properties. The second one, according to an ASCII table, is a Bell character. What the heck is that for?
In any case, your code neatly captures just the text.
I assume that there is no way to retrieve just the (visible) text, right?