Word插入文件 VBA 合并 文件

简介: (1)Word中有的时候,需要合并多个文件。Word本身提供了非常简单的方法。只需使用菜单“插入->文件”命令即可完成该操作。 VBA代码:Selection.Range.InsertFile(AFileName, '', False, False, False); (2)可是会遇到一点问题 插入的文件,为啥不页眉信息丢失了。

(1)Word中有的时候,需要合并多个文件。Word本身提供了非常简单的方法。只需使用菜单“插入->文件”命令即可完成该操作。

 

VBA代码:Selection.Range.InsertFile(AFileName, '', False, False, False);

 

(2)可是会遇到一点问题 插入的文件,为啥不页眉信息丢失了。

 

如:我插入的文件某些页面是横向,但是现在插入后,不是横向的

 

其实解决这个问题,是很容易的,那就是在插入文件的时候,选择“链接”方式插入,如下图

 

Word插入文件

 

VBA代码:Selection.Range.InsertFile(AFileName, '', False, True, False); 

 
(3)可新的问题又来了,链接方式插入的文件,有灰色的底色,很难看。怎么办呢?

     通常情况下,Word会将用户选定的域采用灰色背景进行显示(在打印时灰色背景不会打印出来),这主要是由于"域底纹"选项在发挥作用。如果用户不希望采用这种显示方法,则可执行"工具"菜单中的"选项"命令,然后在"视图"选项卡的"域底纹"框中选择"不显示"选项即可取消其显示。

 VBA代码:ActiveWindow.View.FieldShading := wdFieldShadingNever;

 

(4)因为插入链接的方式,其实是间接的使用WORD的插入文件域“INCLUDETEXT”,这也就可能造成“域嵌套太深”的错误。其实解决方法也很简单,就是断开链接,也就相当于减少了一个域。所以也就不会“域嵌套太深”了^_^。具体操作为:在菜单“编辑->链接”中,断开链接源即可。

 

VBA代码:ActiveDocument.Fields.Item(1).LinkFormat.BreakLink;

相关文章
|
4月前
|
PHP Python
基于Python中docx与docxcompose批量合并多个Word文档文件并逐一添加分页符
基于Python中docx与docxcompose批量合并多个Word文档文件并逐一添加分页符
159 1
|
4月前
|
机器学习/深度学习 定位技术 数据格式
Python对大量表格文件加以数据截取、逐行求差、跨文件合并等处理的方法
Python对大量表格文件加以数据截取、逐行求差、跨文件合并等处理的方法
120 1
|
编译器 开发工具
在word中插入带行号的代码
在word中插入带行号的代码
在word中插入带行号的代码
|
10月前
|
Python
python操作Excel插入n行后粘贴复制数据
python操作Excel插入n行后粘贴复制数据
156 0
|
API
Apose.word控件获取书签中的内容并复制到一个新的word文档中
Apose.word控件获取书签中的内容并复制到一个新的word文档中
397 0
Apose.word控件获取书签中的内容并复制到一个新的word文档中
|
PHP Python
Python合并多个Word文件并批量添加分页符
本文介绍基于Python,实现对多个Word文档加以自动合并,并在每次合并时按要求增添一个分页符的方法~
450 1
Python合并多个Word文件并批量添加分页符
合并多个Excel文件
这条分享来自百度经验https://jingyan.baidu.com/article/e6c8503cb6ed7ee54e1a1811.html  知识在于点滴积累
1202 0