word2007如何将图片批量旋转
我们都知道如何旋转一张图片,然而一张一张图片旋转太过于耗时,那么能否一次性选择多张图片呢 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 采纳本方法之前,先备份文档,以免转换后图片位置发生变动导致整篇文档的发生变化难以恢复。
赞 (0)