word插图时如何保证大小一致

来源:百度知道 编辑:UC知道 时间:2024/05/26 17:36:54
我做论文时需要插入一组图片,他们面积不一样,但是我想在插入到word后保证他们是一样大小的

随便录一个宏,用以下代码替换,改一下宽度和高度数值,运行即可设置文档中全部图片

Sub Macro()
Mywidth=10'10为图片宽度(厘米)
Myheigth=10'10为图片高度(厘米)
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape

End Sub

先插入一个文本框,在在文本框里面插图片
连续图的话
用一个多行一列的表格
每个格子里面插一个就好了。

图片格式里设置宽和高

拖动成一样大小