急～！马上给分！word问题，在线等！

Question

怎样才能将一个word文档完全的复制到一个新建的word文档中（包括页眉）
我将它先放到剪贴板中，再粘贴到新文档中，可是页眉怎么办？
还有，我有一个文档里有表格，粘贴时报错，奇怪？？～～拜托各位高手了～～

Answer 1

先定义一个word.application
然后，set 定义的word.application = word.application 
用open 打开文件
用copy方法，最后用save
colse  就可以了很简单。

Answer 2

Sub Macro1()
'
' Macro1 Macro
' 宏在 2004-7-16 由 40666 录制
'
    Selection.WholeStory
    Selection.Copy
    Documents.Add DocumentType:=wdNewBlankDocument
    Selection.PasteAndFormat (wdPasteDefault)
End Sub这个太简单了，，
这个容易实现，赶快给分吧，，，，，哈哈。

Answer 3

换个思路吧，非常简单，无非就是要生成一个和原来一样的WORD文档而已。
只要一句话就解决了：
FileCopy "c:\Old.doc", "c:\New.doc"
你打开New.doc看看吧，和原来那个一模一样。

Answer 4

晕倒，这样做还要你说，我是要将几个不同的word文档组成一个新的word文档

Answer 5

3楼的宏是不是XP的，怎么我在word2000中无法运行呀～～～

Answer 6

Sub Macro1()
'
' Macro1 Macro
' 宏在 2004-7-16 由 40666 录制
'
    Selection.WholeStory
    Selection.Copy
    Documents.Add DocumentType:=wdNewBlankDocument
    Selection.Paste
End Sub以上是在office 2000里测试过了。
成功!!!!!!!!!!!!!!!!!!!!!!!!

Answer 7

宏运行可以，关键是我的做法呀，我是先新建一个空的文档，然后打开一个固定的文档，将固定文档的所有内容（包括页眉）copy到剪贴板中，然后关闭固定文档（不保存）。接着将剪贴板中的内容粘贴到新的空文档中。
思路就是这样了，那个宏我应该怎么用呢？

Answer 8

换句话说，我这么控制那个新生成的word？