使用word將圖片變成統一大小

在word排版中，如果內容有多個圖片，您想把所有圖片變成統一大小，圖片少你可以手拖拉，但是如果是幾十張上百張，累死人。
根據作者多次辛苦的摸索和尋找，終於找到一個好方法，一勞永逸。就是使用word的宏。

步驟

（01）準備圖片，我就以5張圖片為例吧。

（02）打開word，導入圖片。插入-圖片，選擇圖片插入，進入目錄後，Ctrl+A即可選擇全部。

（03）按Alt+F8，進入宏編輯窗口。首先輸入宏名稱，然後點擊新建即可。

（04）在代碼窗口中輸入如下代碼：Dim iSha As InlineShapeFor Each iSha In neShapes If = wdInlineShapePicture Then    AspectRatio = msoFalse '不鎖定縱橫比        h = CentimetersToPoints(9#)  '寬5CM           ht = CentimetersToPoints(9.2) '高5CM             End If             Next

（05）點擊運行，如下圖：

（06）運行後，關閉宏編輯窗口，放心，關閉窗口後，宏還在，可以不保存。結果如下：