怎么把两个word文档合成一个

怎么把两个word文档合成一个

日常工作中经常会使用到Word文档，身边的同事经常会问到有关文档如何合并的问题。以下将介绍经常用到的两种合并方式。

打开Word文档。这里涉及到两个文档打开哪个的问题。假设需要把文档2的内容合并到文档1中，则打开文档1。反之亦然。

将光标移动至所需要合并的内容后面，如红色箭头标识所示。本例子中因排版需要另起一行。

选择菜单栏中的“插入”，点击工具栏中“对象”右侧的小三角符号，选择“文件中的文字”。

在弹出的对话框中选择需要合并的Word文档。本例子中选择“合并文档(2)”。

点击“插入”选项。

最后合并的样式如图所示，如果文档中格式出现偏差，可以适当调整文档格式。

将两个Word重命名，分别命名为文档1，文档2。本例子中需要将文档2内容合并至文档1。

打开文档1，光标放置在Word文档末尾。

按住键盘中Alt不放，点击F11，弹出代码窗口。

点击“插入”，选择“模块”，将弹出代码编辑窗口。

将以下代码复制至编辑框内（如图红色框中标志的内容）：

Sub hebingshuju() Application.ScreenUpdating = False MyPath = ActiveDocument.Path MyName = Dir(MyPath & "\" & "*.doc") j= 0 Do While MyName <> "" If MyName <> ActiveDocument.Name Then Set wb = Documents.Open(MyPath & "\" & MyName) Selection.WholeStory Selection.Copy Windows(1).Activate Selection.EndKey Unit:=wdLine Selection.TypeParagraph Selection.Paste j= j+ 1 wb.Close False End If MyName = Dir Loop Application.ScreenUpdating = True End Sub

点击红色框中的三角符号，运行代码即可得到合并的Word文档。

第一种合并方式：1.打开Word文档。

2.选择"插入”-->“对象”-->“文件中的文字”

3.选择合并的文档，点击"插入"。

第二种合并方式：1.重命名文档，打开文档。

2.按Alt+F11进入编辑窗口

3.选择插入模块，复制代码并运行。