操作方法
打开Word文档，点击“文件”→“页面设置”。
在“页面设置”中把“页边距”上下左右全改为“0.5厘米”，再将方向改成“横向”接着按“确定”
然后插入要打印的图片，点击菜单栏“插入”→“图片”→“来自文件”
找到存放图片的路径选择图片，并点击“插入”。
此时图片插入Word文档内
接着点击“工具”→“宏（M）”→“宏（M）”。 此时弹出“宏”设置窗口，在“宏名”下输入名称，输入完成后点击“创建”如下图
弹出“Microsoft Visual Basic”复制下面代码粘贴到“代码”窗中保存。 Dim i As Integer For i = 1 To ActiveDocument.InlineShapes.Count With ActiveDocument.InlineShapes(i) .Height = 238 * 0.7 .Width = 315 * 0.8 .Borders(wdBorderTop).LineStyle = wdLineStyleSingle .Borders(wdBorderTop).LineWidth = wdLineWidth050pt .Borders(wdBorderTop).Color = wdColorAutomatic End With Next i 再回到Word文档界面，单击菜单栏“工具”→“宏（M）”→“宏（M）”选择刚才输入的名称点击“运行”即可。 此时Word文档内的图片都缩小到A4纸张能打印8张图的目标。