wps使用技巧：[3]在A4纸上统一图片尺寸

1、启动软件，页面布局——页边距——自定义页边距

2、在自定义页边距对话框中，在页边距上下左右都选择5，方向改为横向

3、插入——图片，选择需要插入的图片确定

4、开发工具——宏，输入宏名，点击创建

5、再出现的代码栏内输入以下代码：

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

6、回到宏，选择刚才创建的宏名，选中后点击运行

7、预览下就出现如下图所示