怎样用word在A4纸上打印四张尺寸大小一样的图片用windows图片和传真查看器打印的他会使图片旋转

按alt+F11。然后在project右键插入模块，然后粘贴
Sub Macro()
Mywidth = 4.13
Myheigth = 5.69
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这里的数字你自己改大小】