word批量修改图片大小

   前两天一个朋友因为业务需求，给我发来几十张身份证照片，rangwofangdaoword里面，
帮他设置处理一下。方便他直接打印。发过来的身份证照片直接打印出来太大，需要将图
片受限调整大身份证的标准大小：85.6*54毫米。这么多图片，肯定要批量处理，自己百
度学习摸索实践之后，发现下面的办法比较好：

   1，首先新建一个word，将图片全部选中，拖进word；
   2，重点是这一步操作：

   按alt+F11。然后在project右键插入模块，然后粘贴
   Sub Macro()
   Mywidth = 8.56.13
   Myheigth = 5.40
   For Each iShape In ActiveDocument.InlineShapes
   iShape.Height = 28.345 * Myheigth
   iShape.Width = 28.345 * Mywidth
   Next iShape
   End Sub
   再按F5，就行了。 
   【Mywidth = 4.13 Myheigth = 5.69这里的数字你自己改大小】

   3，实践证明，在图片比例正常的情况下，只需要修改其中一个参数即可。