怎么把word的图片调整成一样的大小

Question

像这样在表格里面的图片。请给个详细的步骤。。

Answer 1

我之前也是找不到直接的方法，就做了个宏命令

Sub setpicsize() '设置图片大小
Dim n '图片个数
On Error Resume Next '忽略错误
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片
ActiveDocument.InlineShapes(n).LockAspectRatio = msoFalse
ActiveDocument.InlineShapes(n).Height = 400 '设置图片高度为 400px
ActiveDocument.InlineShapes(n).Width = 300 '设置图片宽度 300px
Next n
For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片
Selection.InlineShapes(n).LockAspectRatio = msoFalse
ActiveDocument.Shapes(n).Height = 400 '设置图片高度为 400px
ActiveDocument.Shapes(n).Width = 340 '设置图片宽度 300px
Next n
End Sub

通过调整400----340的值，设置你的图片大小

Answer 2

1、选中第1张图片，鼠标右键--大小和位置--将图片尺寸设置为你所需的大小。
2、选中第2张图片，按F4键。
3、选中第3张图片，按F4键。
4、……

Answer 3

只能一张一张的设置哦