word文件合并

Word文档是目前最常用的一种数据文档，所以研究Word文档的合并具有比较现实的意义。

首先强调一点，就是由于Word本身的强大功能，合并Word文档只要使用Word本身的功能就可以了，根本不必借助于第三方工具软件。

　　在Word这众多功能中，有三种功能可用于合并文档，即自动图文集、图文场和文件插入，其中尤其以插入文件操作最为简单方便，其次就是图文场功能。自动图文集用于合并文档，操作过程太麻烦，这里就不介绍了。

步骤/方法

　

　 利用插入文件的功能来合并文档。

应该说，使用Word程序提供的插入文件功能来合并文档是一种最简单的方法。合并文档的时候，首先打开第一个文档，然后将插入点定位到文档的末尾，再执行“插入→文件”操作可打开插入文件对话框。

通过对话框中的列表找到要合并到当前文档中的文档双击，即可将整个的文档内容插入到光标所在位置。针对所有要合并起来的文档进行同样的操作，即可达到将多个文档合并起来的目的。

巧用"图文场"合并文档

　　当你阅读文档要收集文档中的有用信息、或者为文档做摘要时，常需要把一些不连续的内容合并在一起，这时如果利用word的图文场功能，则可起到事半功倍之效。
　　所谓Word中的"图文场"，是指能够存储被移动的多个对象的特殊的"自动图文集"词条。操作时需要先将各对象添至图文场中，然后将其作为一整体插入到新的位置或文档。各对象都保留在图文场中，可重复插入。如果要将另一组对象添至图文场，则必须先清空图文场内容。
　　具体操作如下：
　　1. 选中（拖亮）对象(文本或图形)；
　　2. 按下"Ctrl+F3"组合键，就可将这个对象移到Word中的图文场；
　　3. 对每个要移到图文场的对象依次重复以上两步(注意如果文档中还需要被剪贴了的内容，剪贴以后需要及时按Ctrl+Z组合键恢复原来的内容)；
　　4. 将鼠标放到要插入图文场内容的位置；
　　5. 如果插入图文场内容，并清空图文场，按下"Ctrl+Shift+F3"组合键；如果只插入图文场的内容而不清空图文场，可先按住"Shift"键，然后选择"插入"菜单中的"自动图文集"命令，再单击"自动图文集"命令，在"请在此键入'自动图文集'词条"框中，单击"Spike"，然后单击"插入"按钮。
　　另外，如果要查看图文场的内容，可选择"插入"菜单中"自动图文集"命令，再单击"自动图文集"名称列表中的"spike"选项，Microsoft Word会在"预览"框中显示全部或部分图文场内容。

创建宏合并文档

1、建立一个新的Word文档。

2、选择“工具”--〉“宏”--〉“创建一个新宏”，我们给他起个名字叫“hebing”。

3、到此我们看见一个类似VB6.0一样的编译环境。并且会有一个名字为hebing得过程。我们在过程中将下面的代码Copy进去。

Dim hb, fso, f, f1, s, sf

hb = InputBox("请输入您要合并的文件所在的文件夹。", "输入要合并的目录", "比如像C:\text\这样")
If hb <> "" Then
ChangeFileOpenDirectory (hb)
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(hb)
Set sf = f.Files
For Each f1 In sf
s = f1.Name
Selection.InsertFile FileName:=(s), Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False
Next
Else
End If
4、关闭VB宏编辑环境（或者您关闭此新文档也可以），然后再打开此文档。

5、再选择“工具”--〉“宏”--〉“运行”（注意运行名字为hebing的宏），我们会发现出现了一个对话框，然后，我们只要输入你要合并的文件所对应的文件夹并且点“确定”就可以了。