word2003中怎样批量调整图片大小
2个回答
展开全部
一,在word中按alt+f11组合键,进入VBA模式
二,在左边的工程资源管理器中找到你的word文档,在其上右键/添加/模块
三,把下面代码复制,粘贴进去.
四,更改数值, 改一下宽度和高度数值(10),点运行(类似播放按钮.)或f5,即可设置文档中全部图片
Sub Macro()
Mywidth=10'10为图片宽度(厘米)
Myheigth=10'10为图片高度(厘米)
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShapeEnd Sub
由于是批量的处理同样的事情,因此要用到宏。
是这样的,如果你的图片显示的是嵌入式的。也就是不能旋转的那种格式,钻切换大小会很容易,方法
要使用宏命令。
宏主要用来处理有规律的重复的工作,相当于批处理。想好了就能编辑出来。工具→宏→录制新宏→然后指定一个快捷键(如L,相当于ctrl L快捷键),然后指定、关闭。开始录制宏。把你能够重复的操作执行一下,以计算机能识别的重复为准。然后→工具→宏→停止录制。这样宏就录制出来了。你ctrl L执行就行了。连续按,则连续执行。如果不完全正确,还要修改或重新录制宏。
对你来说:使用的循环是:查找,图形→然后调整大小,然后鼠标移到图形右侧。然后再执行循环。这个命令是:ctrl F,点开高级,查找里面,选择特殊格式里面的“图形”,单击查找下一个。关掉查找界面,回到word编辑界面。直接去单击 格式菜单里面的 图片,设置大小为你认可的比例。确定。然后将光标用键盘移出 图片(右移以下)。
执行宏即可。
二,在左边的工程资源管理器中找到你的word文档,在其上右键/添加/模块
三,把下面代码复制,粘贴进去.
四,更改数值, 改一下宽度和高度数值(10),点运行(类似播放按钮.)或f5,即可设置文档中全部图片
Sub Macro()
Mywidth=10'10为图片宽度(厘米)
Myheigth=10'10为图片高度(厘米)
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShapeEnd Sub
由于是批量的处理同样的事情,因此要用到宏。
是这样的,如果你的图片显示的是嵌入式的。也就是不能旋转的那种格式,钻切换大小会很容易,方法
要使用宏命令。
宏主要用来处理有规律的重复的工作,相当于批处理。想好了就能编辑出来。工具→宏→录制新宏→然后指定一个快捷键(如L,相当于ctrl L快捷键),然后指定、关闭。开始录制宏。把你能够重复的操作执行一下,以计算机能识别的重复为准。然后→工具→宏→停止录制。这样宏就录制出来了。你ctrl L执行就行了。连续按,则连续执行。如果不完全正确,还要修改或重新录制宏。
对你来说:使用的循环是:查找,图形→然后调整大小,然后鼠标移到图形右侧。然后再执行循环。这个命令是:ctrl F,点开高级,查找里面,选择特殊格式里面的“图形”,单击查找下一个。关掉查找界面,回到word编辑界面。直接去单击 格式菜单里面的 图片,设置大小为你认可的比例。确定。然后将光标用键盘移出 图片(右移以下)。
执行宏即可。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |