求助高手帮忙！！在先等待！！！word文档A的内容复制粘贴到word文档B的特定位置 ( 积分: 34 )

word文档A的内容复制粘贴到word文档B的特定位置
WordObj.Documents.Open(FileName:=ExtractFilePath(Application.ExeName)+'./doc/A.doc', [red]Visible := False[/red]);------------1
WordObj.Documents.item('A.doc').Activate;------------2
WordObj.ActiveWindow.selection.WholeStory;
WordObj.ActiveWindow.selection.copy;
WordObj.windows.item('B.doc').activate;
WordObj.ActiveWindow.Panes.item(1).Activate ;
WordObj.Selection.Paste ;
WordObj.activeDocument.saveas;

如果在1处设置visible为true，则程序运行没有问题，可是我希望打开A文档时，A文档不可见，只让用户看到B文档，所以就设为False了，但是设置为False后，运行到语句2的时候就报错：“文件名无效”
哪位大虾知道应该怎么办？

word文档A的内容复制粘贴到word文档B的特定位置
WordObj.Documents.Open(FileName:=ExtractFilePath(Application.ExeName)+'./doc/A.doc', [red]Visible := False[/red]);------------1
WordObj.Documents.item('A.doc').Activate;------------2
WordObj.ActiveWindow.selection.WholeStory;
WordObj.ActiveWindow.selection.copy;
WordObj.windows.item('B.doc').activate;
WordObj.ActiveWindow.Panes.item(1).Activate ;
WordObj.Selection.Paste ;
WordObj.activeDocument.saveas;

如果在1处设置visible为true，则程序运行没有问题，可是我希望打开A文档时，A文档不可见，只让用户看到B文档，所以就设为False了，但是设置为False后，运行到语句2的时候就报错：“文件名无效”
哪位大虾知道应该怎么办？

或者能把olecontainer中嵌入的word文档的内容复制粘贴到文档B也可以
求助呀

你查查ole，应该有很多相关的贴子

接受答案了.