虾皮小说【m.xpxs.net】第一时间更新《日常生活工作学习知识积累》最新章节。
2. 按`Alt + F11`打开VbA编辑器。
3. 插入一个新模块，并输入以下宏代码：
```vba
Sub binedocuments dim mydoc As document
dim filepath As String
dim fileName As String
dim folderpath As String
' 设置文件夹路径
folderpath = \"c:\\YourFolderpath\\\" ' 更改为你的文件夹路径
' 获取文件夹中第一个word文件
fileName = dir(folderpath & \"*.docx\")
' 循环遍历所有文件
do while fileName ＜＞
' 打开文件
Set mydoc = documents.open(folderpath & fileName)
' 将内容添加到主文档
Activedocument.content.InsertAfter mydoc.content
' 关闭打开的文档
mydoc.close False
' 获取下一个文件
fileName = dir Loop
End Sub
```
4. 运行宏，将指定文件夹中的所有word文档合并到当前打开的文档中。
选择适合你的方法进行操作，就可以快速将多个word文档合并为一个。
