如何改代码，使EXCEL 的 VBA 能够获得整个WORD文档的内容

lhdcxz

如何改代码，使EXCEL 的 VBA 能够获得整个WORD文档的内容？（我才学习WORD  VBA。不知道如何获得整个文档的内容，只好要求文档的最后用两个回车）
要改动的代码段（见全部代码）：
wdDoc.Select    ' 选择WODR文档
With wdapp.Selection.Find
       .Text = "*^13^13"  '  '得到到两个回车的文字段、
     .Forward = True
        .Wrap = wdFindContinue
        .MatchWildcards = True
    End With
    wdapp.Selection.Find.Execute
    Worddoc = wdapp.Selection   '得到需要的文字

[ 本帖最后由 lhdcxz 于 2009-7-2 13:36 编辑 ]