Ok I solved the problem for those who want a solution:

Dim DestString As String
DestString = WordDocument.Shapes("Text Box
7").TextFrame.TextRange.Text

Now I have another problem, albeit minor one. The String always ends
with a square symbol. It looks like a small, blocky zero and always
appears at the end of every string that the .Text method returns.
What's up with this? I did the hard part already, so please help!


--
yl358
------------------------------------------------------------------------
yl358's Profile: http://www.excelforum.com/member.php...o&userid=35776
View this thread: http://www.excelforum.com/showthread...hreadid=559801