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文档合并为一个。