欢迎光临散文网 会员登陆 & 注册

Word VBA:批量给Word文件添加水印

2022-07-10 17:48 作者:ch_j  | 我要投稿

 因为平时几乎用不到添加水印的功能,所以对于我来说,也需要录制宏先分析一下。下面是思路:

本文所讨论的是Word自带的水印功能。此功能可以通过【设计】选项卡-【页面背景】-【水印】找到。

Word水印功能导航

一、新建文档、录制宏

Word水印功能里面具体有的【图片水印】和【文字水印】两种:

1.图片水印

(1)录制的宏代码

(2)分析

代码功能

代码的核心是要在每节的页眉/页脚插入一个图片,而我们在插入时设置的其他参数如透明度都是在插入图片后的代码里体现的。

图片水印添加步骤及效果

(3)图片水印的实质

我们双击进入已经添加水印的节的页眉,然后点击图片,从【图片格式】菜单里查看属性,可以知道:

A.该水印图片是一幅衬于文字下方的

B.设置过亮度、对比度等参数的图片

这些参数设置在录制的代码里都能清楚地看到。

由此可以总结:图片水印实质上是往页眉/页脚中添加一张经过处理过和图片。

2.文字水印

(1)录制的代码

(2)分析


删除图片水印

开头这些代码主要是删除页眉中第一次添加的图片水印

核心:添加艺术字形状

核心语句是这块代码在这一节的页眉处用【AddTextEffect】方法,将艺术字形状添加进去。

官网说明示例

通过微软官方的说明示例也能再次得到印证:文字水印从根本或者根源上讲,是往页眉或页脚中添加形状,而且这个形状是一个特殊的【艺术字形状】

而后面其他代码都是在设置上面添加的艺术字形状的其他参数比如亮度、透明度等等。

二、思路分享

从前面分析可以知道,Word里添加水印,就是在文档每节的页眉/页脚插入图片或艺术字形状。

那么大致有两种思路:

1.从头开始

代码中每次从头开始选择图片进行处理或每次重新添加艺术字形状及设置好其各种效果。

文字艺术字参数展示1


文字艺术字参数展示2

但是这种方法设计程序,要么需要使用者自己调整代码,就算用InputBox()等方式让用户传递参数,用户也不能提前预览效果。所以对于编写简单上手的程序不推荐此方法

2.统一为插入图片

将图片或艺术字效果提前统一设置为图片,这样使用都批量插入时参数就越少。

因为不是做完美的插件,是做一个马上可以上手用,而且操作简便的小程序。所以,我推荐用这种方式,只需要选择存放Word文件的主文件夹或者选择多个文件,就可以马上完成工作。

三、示例代码

这里主要是以【统一插入图片】的方法,设计的简单程序

1.准备

使用者的准备工作:提前将水印效果的图片处理好(用Word、PPT、PS都可以)

2.代码


Word VBA:批量给Word文件添加水印的评论 (共 条)

分享到微博请遵守国家法律