最近一直在写实验报告，报告里的图片动辄几十张，如果想给所有图片加上边框就很费劲。
刚刚找到了一种方法，利用Word宏功能，批量添加图片边框。
随手写篇博客记一下，说不定以后还会用到

首先在Word顶部菜单栏中找到 视图 -> 宏 -> 查看宏

在宏窗口输入宏名，我这里输入了 Picture ，也可以些别的名字。然后点击创建。

将初始化的代码内容全部删除，粘贴以下代码：

Sub Example()
    Dim oInlineShape As InlineShape
    Application.ScreenUpdating = False
    For Each oInlineShape In ActiveDocument.InlineShapes
        With oInlineShape.Borders
            .OutsideLineStyle = wdLineStyleSingle
            .OutsideColorIndex = wdColorAutomatic
            .OutsideLineWidth = wdLineWidth050pt
        End With
    Application.ScreenUpdating = True
End Sub
点击保存并执行，图片即可被全部加上边框。
 
 图片边框的效果如下图所示。
 
                    最近一直在写实验报告，报告里的图片动辄几十张，如果想给所有图片加上边框就很费劲。刚刚找到了一种方法，利用Word宏功能，批量添加图片边框。随手写篇博客记一下，说不定以后还会用到首先在Word顶部菜单栏中找到 视图 -> 宏 -> 查看宏在宏窗口输入宏名，我这里输入了Picture，也可以些别的名字。然后点击创建。将初始化的代码内容全部删除，粘贴以下代码：Sub Example()    Dim oInlineShape As InlineShape    Applicat.
				
在排版长文档时，如果文档中有许多图片同时都需要添加边框，如果一张张的手工添加边框，会非常的耗时。这时候，我们可以利用宏批量为图片添加边框。
https://jingyan.baidu.com/article/29697b91c2e31eea21de3c33.html
				
https://3g.163.com/dy/article/DF71NH650511PTTN.html
https://www.zhihu.com/question/23242989
WPS怎么创建宏 在WPS中录制宏的方法
https://jingyan.baidu.com/article/0a52e3f41c1d0abf63ed727b.html
工具链接：https://pan.baidu....