Excel Home
全球知名的Excel资源网站之一

Word文档中插入Flash动画

下载文档:http://t.cn/zRq0VBb ,启用并运行Word宏,批量插入图片后可以实现如下效果:

1、可以将图片的名称显示在图片下方;

2、图片的宽度大小可按要求任意设置(修改宏代码里的相关数值),实现批量等比例缩放。具体操作方法件如下动画演示:

宏代码如下

Sub setpicsize() ‘设置图片大小

Dim n ‘图片个数

On Error Resume Next ‘忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count  ‘InlineShapes类型图片

ActiveDocument.InlineShapes(n).Width =
360  ‘设置图片宽度 300px

Next n

For n = 1 To ActiveDocument.Shapes.Count  ‘Shapes类型图片

ActiveDocument.Shapes(n).Width =
360  ‘设置图片宽度 300px

Next n

End Sub

赞(45)
未经允许不得转载:ExcelHome » Word文档中插入Flash动画
分享到

关于我们联系我们
本站特聘法律顾问:李志群律师   沪ICP备11019229号-2

沪公网安备 31011702000001号

征信