word文件合并

word文件合并

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

首先强调一点，就是由于Word本身的强大功能，合并Word文档只要使用Word本身的功能就可以了，根本不必借助于第三方工具软件。　　在Word这众多功能中，有三种功能可用于合并文档，即自动图文集、图文场和文件插入，其中尤其以插入文件操作最为简单方便，其次就是图文场功能。自动图文集用于合并文档，操作过程太麻烦，这里就不介绍了。

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

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

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

巧用"图文场"合并文档

创建宏合并文档

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

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

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

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

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