word如何合并子文档
答案:1 悬赏:0
解决时间 2021-03-03 09:19
- 提问者网友:敏感魔鬼
- 2021-03-02 13:19
word如何合并子文档
最佳答案
- 二级知识专家网友:花一样艳美的陌生人
- 2021-03-02 14:02
第1种办法:
先保证所有需要合并的文件在一个文件夹内——
1、先打开 word 新建一篇空白文档;
2、点【插入】选项卡里的【对象】--【文件中的文字】 ,
3、选择所要合并的所有 word 文档,点插入,OK! " "
第2种办法:
先保证所有需要合并的文件在一个文件夹内——
1、先打开 word 新建一篇空白文档;
2、进入 word 的工具——> 宏——> Visual Basic 编辑器,将如下代码粘贴到编辑器中,
保存,关闭 Visual Basic 编辑器;
代码如下:
Sub hebing() Dim hb, fso, f, f1, s, sf hb = InputBox( "请输入您要合并的文件所在的文件夹。 ", "输入要合并的目录 ", 比如像 C:\text\这样 ") If hb <> " " Then ChangeFileOpenDirectory (hb) Set fso = CreateObject( "Scripting.FileSystemObject ") Set f = fso.GetFolder(hb) Set sf = f.Files For Each f1 In sf s = f1.Name Selection.InsertFile FileName:=(s), Range:= ", ConfirmConversions:=False, Link:=False, Attachment:=False Next Else End If End Sub
3、再次打开工具——> 宏,这时就可以看到 hebing 宏了,运行 hebing 宏,即开始进行合并.
说明:
A、除中文状态外,代码中的标点符号全为英文半角符号,朋友们在输入时请注意;
B、代码中,从 Selection.InsertFile 开始,到 Attachment:=False 这句较长,请不要提行;
C、合并完成之后,如果有格式问题(主要是子文档的标题可能出“见头不见脚”的现象) , 请执行“编辑”——> “全选”然后执行“格式”——> “段落”——> “行距”进行调整。
D、在您能够正常进行合并后,可以进入“工具”——> “自定义”——> “命令”——> “类别”再 选“宏”,然后拖动命令中的“hebing”宏到任意菜单栏或工具栏,再重新为宏命个名(请见图 一) ,今后点击这个按钮,就能进行 Word 文档的合并了。
E、 该宏只能合并 word 文档, 不能合并中文的文本文档 (英文的文本文档可以合并)
注意:由于影响因素众多,不太保证每次均能成功。但,非常值得一试。
先保证所有需要合并的文件在一个文件夹内——
1、先打开 word 新建一篇空白文档;
2、点【插入】选项卡里的【对象】--【文件中的文字】 ,
3、选择所要合并的所有 word 文档,点插入,OK! " "
第2种办法:
先保证所有需要合并的文件在一个文件夹内——
1、先打开 word 新建一篇空白文档;
2、进入 word 的工具——> 宏——> Visual Basic 编辑器,将如下代码粘贴到编辑器中,
保存,关闭 Visual Basic 编辑器;
代码如下:
Sub hebing() Dim hb, fso, f, f1, s, sf hb = InputBox( "请输入您要合并的文件所在的文件夹。 ", "输入要合并的目录 ", 比如像 C:\text\这样 ") If hb <> " " Then ChangeFileOpenDirectory (hb) Set fso = CreateObject( "Scripting.FileSystemObject ") Set f = fso.GetFolder(hb) Set sf = f.Files For Each f1 In sf s = f1.Name Selection.InsertFile FileName:=(s), Range:= ", ConfirmConversions:=False, Link:=False, Attachment:=False Next Else End If End Sub
3、再次打开工具——> 宏,这时就可以看到 hebing 宏了,运行 hebing 宏,即开始进行合并.
说明:
A、除中文状态外,代码中的标点符号全为英文半角符号,朋友们在输入时请注意;
B、代码中,从 Selection.InsertFile 开始,到 Attachment:=False 这句较长,请不要提行;
C、合并完成之后,如果有格式问题(主要是子文档的标题可能出“见头不见脚”的现象) , 请执行“编辑”——> “全选”然后执行“格式”——> “段落”——> “行距”进行调整。
D、在您能够正常进行合并后,可以进入“工具”——> “自定义”——> “命令”——> “类别”再 选“宏”,然后拖动命令中的“hebing”宏到任意菜单栏或工具栏,再重新为宏命个名(请见图 一) ,今后点击这个按钮,就能进行 Word 文档的合并了。
E、 该宏只能合并 word 文档, 不能合并中文的文本文档 (英文的文本文档可以合并)
注意:由于影响因素众多,不太保证每次均能成功。但,非常值得一试。
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯