电脑
office办公软件
首先用记事本做一个小程序，以便在文件夹中可以同时选中多个文件。代码如下：————————————————————————————Dim fs As FileSearch, i As Long, n As LongSet fs = Application.FileSearchml = ActiveDocument.Pathbwj = ActiveDocument.NameDocuments.AddWith fs.NewSearch.LookIn = ml.FileType = msoFileTypeWordDocumentsIf .Execute > 0 ThenFor i = 1 To .FoundFiles.CountIf .FoundFiles.Item(i) <> ml & '\' & bwj ThenSelection.InsertFile FileName:=.FoundFiles.Item(i)Selection.InsertBreak Type:=wdPageBreakn = n + 1End IfNextEnd IfEnd WithMsgBox '共合并了' & n & '篇文档'——————————————————————————————————将此代码命名为Sub test.bat保存。如果没有这个文件，你就不能在插入时同时选定多个要合并的文档
新建一个文件夹，把《Sub test》放进去，然后再把所有需要合并的word文件都放在这个文件夹之中。
单击功能区中的“插入”选项卡，然后单击“对象”按钮右侧箭头，并单击弹出菜单中的“文件中的文字”命令。
在“插入文件”对话框中，把你新建的那个文件夹打开，按住shift键，全选要合并的多个文档。
单击“插入”按钮，这样所选的多个文档就插入到一个新的文档中了，从而轻松实现了合并多个文档。