目录
技巧一:多幅图像放置在同一个页面内
需求场景:在工作学习中,经常遇到需要将一大堆图片转化成word格式文档,并且为了节约纸张,将多幅图片安排在同一个页面内
解决方案:
(1)新建word文档,插入->图片,选择多张要插入的图片
(2)使用快捷键alt + F8,打开宏窗口
(3)点击右侧的“创建”按钮,创建新的宏
(4)输入以下代码:
Sub setPictureToSameSize()
Dim n '获取图片个数
On Error Resume Next '忽略错误
For n = 1 To ActiveDocument.InLineShapes.Count
ActiveDocument.InLineShapes(n).Width = width * 23.85 '1 cm = 23.85 px
ActiveDocement.InLineShapes(n).Height = height * 23.85
Next n
End Sub
(5)运行该宏即可
注意事项:
(1)width和height为自己要设置的图片宽度和高度,自由指定
(2)代码缺陷,只能将一个文档中的所有图片设置为同一尺寸;且须手动修改宽高
技巧二:excel快速填充功能
点击右下角+,选择快速填充,实现字符串的花式处理(建议EXCEL版本为office2013及以上)