操作方法
启动软件,页面布局——页边距——自定义页边距
在自定义页边距对话框中,在页边距上下左右都选择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
回到宏,选择刚才创建的宏名,选中后点击运行
预览下就出现如下图所示