排版的代码
方法:
按alt+F11。然后在project右键插入模块,然后粘贴 Sub Macro()
Mywidth = 4.13
Myheigth = 5.69
For Each iShape In ActiveDocument.InlineShapes iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub
再按F5,就行了。
【Mywidth = 4.13
Myheigth = 5.69这里的数字你自己改大小】
一页4张图:一个宏一个命令
Sub Macro()
Mywidth = 11.03
Myheigth = 4.9
For Each iShape In ActiveDocument.InlineShapes iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub
一页3张图:一个宏一个命令
Sub Macro()
Mywidth = 12.28
Myheigth = 6.64
For Each iShape In ActiveDocument.InlineShapes iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub
打边框宏
Sub Macro1()
For Each iShape In ActiveDocument.InlineShapes
With iShape
With .Borders(wdBorderLeft)
用Word宏解决编辑中图片大小尺寸问题_IT/计算机_专业资料 暂无评价0人阅读0次下载举报文档 用Word宏解决编辑中图片大小尺寸问题_IT/计算机_专业资料。图片处理...
达达编制 2010 word 批量修改图片大小 借助 word 的宏功能可以很好完成这一任务,无论 word 里有多少图片,很容易就在一瞬间搞 定.。文档里面有几百张图片,规格都...
手工修改每张图片很费时间也费鼠标,所以,你 得好好看看以下如何做了。 打开 word,按下 Alt+F8,出现宏界面,为新建的宏取名为 AdjustPicWidthAndHeight 点击编辑...
Word宏:Word中的图片批量统一大小及同比例缩放(图)_生活休闲。如何在一个word里批量、统一设置图片大小? Word 宏:Word 中的图片批量统一大小 及同比例缩放(图)...
Word中调整图片大小的宏_IT/计算机_专业资料。可以将Word中的所有图片(非嵌入型)调整为统一大小。Word中调整图片大小的宏 Sub setpicsize() '设置图片大小 Dim ...
保存编辑的内容 7、切换回被编辑 WORD 文档,打开宏命令栏,点击运行 8、如果尺寸不合适,切换回宏编辑器,修改 ActiveDocument.Shapes(n).Height = 400 '设置图片...
word改图片大小宏_计算机软件及应用_IT/计算机_专业资料。word改变图片大小的宏,很实用Sub 改图片大小() '设置图片大小 Dim n '图片个数 On Error Resume ...
打开word中宏编辑,拷进去就行。设定好指定的快捷键(宏指定快捷键的方法可以度娘哦!) 在word文档中,选定图片,点击快捷键,ok搞定!...
word批处理图片尺寸 宏代码_计算机软件及应用_IT/计算机_专业资料。Dim n '...(n).Width = 650 '设置图片宽度 71px Next n For n = 1 To ...
在word中批量插入图片的宏脚本_计算机软件及应用_IT/计算机_专业资料。利用该脚本可以选中大量图片,然后批量导入word中,省的一张一张地插入图片费死那劲了。该...
热门文档