今天接到一个任务，将报告中所有图片加边框。报告共有约490张图片，手动一张张处理将耗时太长。搜索网上介绍的批量选中图片方法，但是都是用于非嵌入式图片或者图形。由于插入报告的图片均默认为嵌入式，若先将所有图片调整为非嵌入式并不现实，并且非嵌入式图片不易排版，于是采用VBA代替人手处理。
用VBA为批量嵌入式图片输入边框，关键是自动找出文档中所有嵌入式图片，其中有关键的Inlineshape(s)对象(集)，它是WordVBA中代表文档、区域或选定内容的嵌入式图形(集)。另外要输入边框则使用到Borders边框对象集。以下用一个简单的例子介绍其中的过程和代码，为以下两张图片插入边框。
之前有位朋友提出这样的问题：有一份名单和一张表格，怎样可以按名单逐一将表格打印出来。后来这位朋友用了WORD的邮件合并功能实现了。但恰好正在学习EXCEL的VBA，另外也因为EXCEL没有邮件合并功能，于是就想着用EXCEL
宏和VBA的方法去实现。
本文以一个例子，总结自己用EXCEL的宏及VBA功能实现的具体步骤。
假设现在某公司行政部需要将公司每个人的个人履历表逐一打印出来，供各位员工补充、确认签字并归档。现有一份模板表格，以及早期录入到EXCEL的个人基础信息。
加载中…
