word批量按比例缩放图片.txt 上传者：addd7293 2021-04-23 09:51:50上传 TXT文件 959B 热度 30次 word批量按比例缩放图片 Sub 按比例缩放图片() Dim n '图片个数 Dim picwidth Dim picheight On Error Resume Next '忽略错误 kH=0.95 !图片高度缩放比例 kW=0.95 !图片宽度缩放比例 下载地址 用户评论 更多下载 下载地址 立即下载 用户评论 发表评论
