1. 首先手動拖拽將圖片調到需要的格式，點擊圖片在格式選項中查看圖片的寬高

2. 視圖中點擊宏新建

3. 編輯框中輸入以下代碼並保存，由於我只需要統一寬度，所以將高度統一高度的代碼註釋

Sub 圖片格式統一()
‘
‘ 圖片格式統一 宏
‘
‘

‘Myheigth = 12
Mywidth = 14
On Error Resume Next ‘忽略錯誤
For Each iShape In ActiveDocument.InlineShapes
‘iShape.Height = 28.345 * Myheigth ‘設置圖片高度為任意cm
iShape.Width = 28.345
 
 * Mywidth ‘設置圖片寬度
Next
For Each Shape In ActiveDocument.Shapes
‘Shape.Height = 28.345 * Myheigth ‘設置圖片高度為任意cm
Shape.Width = 28.345 * Mywidth ‘設置圖片寬度
Next

End Sub

4. 回到宏界面，運行，done。

word使用宏定義來統一設置圖片大小