作者:乔山办公网日期:
返回目录:office365
1、打开一篇文章,里面是全图片,大小不一。可以看到【图片工具】抄中的高度和宽度。
2、右点击一下,跳出一个选项框,选择【其他】。
3、选择【大小】--【高度】-【宽度】。
4、还需要把【相对原始图片】前面的打钩去掉。
5、图片的大小,可以在【图片工具】--【压缩图片】。
6、如果想给图片加边框,用快捷键ctrl+a,设置好之后,选择预览打印的zhidao效果。
word中没有设置调整图片大小的快捷键,只有用鼠标在图片上拖动改变其大小。在zhidaoWord中选中图片,图片四周会显示上下左右,以及四个角等八个节点,拖动这些节点即可调整图片的大小。不过图专片大小的调整也是以10像素为单位的属,要想进行微调,以1像素为单位,可先按下快捷键“Alt”不放,再拖动节点调整即可。
word中将图片缩放改为30%的方法如下:
1、通过桌面快捷方式或搜索来百打开word文档。
2、在随后打开的界面左侧点击需要设置图片缩放的文档。
3、在接着打开的界面中点击图片,度使其自动出现控制点。
4、在word文档界面上方的“格式回”选项卡右侧点击“更多”按钮。
5、在随后弹出答的对话框中勾选“锁定宽高比”,并将宽度和高度改为30%,随后点击确定即可。
自己写一个vba,也就是宏,再将这个宏附加到按钮上,再添加到工具栏里。
按比例缩放e79fa5e98193e58685e5aeb9331:把word中的所有图片按比例缩放!
vba代码如下:
Sub
setpicsize() '设置图片大小
Dim n '图片个数
Dim picwidth
Dim picheight
dim obj
On Error Resume Next '忽略错误
For
n = 1 To
ActiveDocument.InlineShapes.Count 'InlineShapes类型图片
obj=ActiveDocument.InlineShapes(n)
picheight =obj.Height
picwidth = obj.Width
obj.Height = picheight * 0.9 '设置高度为.9倍
obj.Width = picwidth * .9 '设置宽度为.9倍
Next
For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片
obj=ActiveDocument.Shapes(n)
picheight = obj.Height
picwidth = obj.Width
obj.ight = picheight * .9 '设置高度为.9倍
obj.dth = picwidth * .9 '设置宽度为.9倍
Next
End
Sub