word里图片怎样旋转,word图片无法旋转

word里图片怎样旋转

导言:word中word里图片怎样旋转我们可以单独设置一个图片的角度word里图片怎样旋转,但是有时候我们如果想设置所有图片的角度有没有什么好办法呢?答案就是vba操作word里图片怎样旋转,有的朋友一听vba,抱拳就要准备离开,别别别,其实vba使用起来不麻烦的,可以参考《如何批量修改word所有图片的尺寸》这篇文章的 *** ,3步就可以使用vba实现目的。

比如我们现在想让下面的图片全都顺时针旋转90度

word里图片怎样旋转

那么我们的步骤如下

勾选开发工具后,进入vb编辑器,在右面的代码窗口中输入

Sub 更改图片方向()

On Error Resume Next

Application.ScreenUpdating = 0

Dim 浮动图, 嵌入图, 旋转角度$

Set 文档 = ActiveDocument

旋转角度 = InputBox("请输入你想要旋转的角度" & Chr(13) & "顺时针90度输入 90" & Chr(13) & "逆时针170度输入 -170")

For 浮动图 = 1 To 文档.Shapes.Count

文档.Shapes(浮动图).IncrementRotation 旋转角度

Next 浮动图

For 嵌入图 = 1 To 文档.Range.InlineShapes.Count

With 文档.Range.InlineShapes(嵌入图).ConvertToShape

.WrapFormat.Type = 4

.Rotation = 旋转角度

.ConvertToInlineShape

End With

Next 嵌入图

Application.ScreenUpdating = 1

MsgBox ("一闪流溢提示:旋转完毕")

End Sub

word里图片怎样旋转

关闭vb窗口,按alt+F8,运行这个宏word里图片怎样旋转

word里图片怎样旋转

接下来会弹出一个窗口 让我们输入旋转的角度

这里要注意的是如果你想让图片逆时针旋转,那么就要输入负值

word里图片怎样旋转

因为我们想让所有图片顺时针旋转90度,所以我们输入90

word里图片怎样旋转

稍等片刻后

会弹出一个窗口,提示你所有图片旋转完毕

word里图片怎样旋转

我们关掉窗口,就会看到所有的图片已经旋转了90度了

word里图片怎样旋转

可以参考动图操作

word里图片怎样旋转

总结时间

善用vba宏批量操作文档可以极快地提升工作效率且不易出错,关注并给我私信,发送关键词“批量旋转图片”即可bas代码源文件哦word里图片怎样旋转

如果觉得有所收获的话,希望点赞、收藏、评论、转发支持一下,你的支持对我很重要!

关注一闪流溢,每天都能get新技能!

发布于 2024-07-01 11:07:19
收藏
分享
海报
0 条评论
46
目录

    0 条评论

    本站已关闭游客评论,请登录或者注册后再评论吧~