如何批量修改批注里的图片大小（批注里插入了图片）

　　分析：由于Word不能像excel一样多选图片，所以不能多选图片后统一缩放，所以考虑可以重复多次一样动作的宏功能：

　　1、打开视图-宏-输入一个名字-创建

　　2、输入以下代码，注意替换内有的内容和尺寸不是下面的5cm可以直接更改。

　　Sub FormatPics()

　　Dim iSha As InlineShape

　　For Each iSha In ActiveDocument.InlineShapes

　　If iSha.Type = wdInlineShapePicture Then

　　iSha.LockAspectRatio = msoFalse '不锁定纵横比

　　iSha.Width = CentimetersToPoints(5) '宽5CM

　　iSha.Height = CentimetersToPoints(5) '高5CM

　　End If

　　Next

　　End Sub

　　3、宏-运行，可以直接批量缩放图片尺寸，左边为最终效果图。

首先将批注显示出来，然后双击批注的边框，可以打开“设置批注格式”对话框，选择“颜色和线条”选项卡，从“填充”栏的“颜色”项的下拉列表中选择“填充效果”项，随后可以打开“填充效果”对话框，选择“图片”选项卡，单击其中的“选择图片”按钮，选择要放在批注中的图片，然后连续单击“确定”按钮，回到Excel编辑状态，就可以看到选择的图片已经添加到批注中了。 要同样大小的话，必须是要图片的像素大小一样。