求助,将word中的图片批量旋转180度。 无法全部选中。 网上相似的问题好像没解决。 谢谢大家了!
展开全部
Word2007及以上版本才能对外部图片进行旋转操作。要想批量旋转,只能采用Word2007及以上版本,以及用VBA来实现就可以了。 不过,这个VBA代码得到的结果,只能满足批量旋转图片的目的,但旋转之后,图片的位置会发生变动,而且只对所有的嵌入式图片有效。按Alt+F11,打开VBA编辑器,将如下代码直接粘贴进来,然后按F5运行即可。
Sub Rotate()
Do Until ActiveDocument.InlineShapes.Count = 0
ActiveDocument.InlineShapes(1).Select
ActiveDocument.InlineShapes(1).ConvertToShape
Selection.ShapeRange.IncrementRotation 180# '这里的180#代码旋转的度数,0~359.9
Loop
end sub
采纳本方法之前,先备份文档,以免转换后图片位置发生变动导致整篇文档的页面布局发生变化难以恢复。
Sub Rotate()
Do Until ActiveDocument.InlineShapes.Count = 0
ActiveDocument.InlineShapes(1).Select
ActiveDocument.InlineShapes(1).ConvertToShape
Selection.ShapeRange.IncrementRotation 180# '这里的180#代码旋转的度数,0~359.9
Loop
end sub
采纳本方法之前,先备份文档,以免转换后图片位置发生变动导致整篇文档的页面布局发生变化难以恢复。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |