2.按`Alt+F11`打开VbA编辑器。

3.插入一个新模块，并输入以下宏代码：

```vba

SubbedotsdiydocAsdot

difilepathAsStrg

difileNaAsStrg

difolderpathAsStrg

'设置文件夹路径

folderpath=\"c:\\YourFolderpath\\\"'更改为你的文件夹路径

'获取文件夹中第一个word文件

fileNa=dir(folderpath&\"*.docx\")

'循环遍历所有文件

dowhilefileNa＜＞

'打开文件

Setydoc=dots.open(folderpath&fileNa)

'将内容添加到主文档

Activedot.tent.IAfterydotent

'关闭打开的文档

ydoc.closeFalse

'获取下一个文件

fileNa=dirLoop

EndSub

```

4.运行宏，将指定文件夹中的所有word文档合并到当前打开的文档中。

选择适合你的方法进行操作，就可以快速将多个word文档合并为一个。