請問大家：

如果你的Word文檔有成百上千張圖片，你有什么方法將它們對齊、固定尺寸？

正常想法肯定是先全選圖片，然后設置尺寸、對齊是嗎？可惜了，當你全選圖片的時候，要么會把文字也選了，要么會發現沒有圖片高度的設置了。

所以咋辦呢？怎樣才可以快速讓這些圖片整整齊齊、尺寸統一呀？嘿嘿~其實也不難，下面職場老鳥就教你一步步操作吧：

1、按快捷鍵【Alt+F8】出現VBA窗口，輸入宏名并創建。

2、接下來進入VBA編輯窗口，將以下代碼復制進去：

Sub img() '設置圖片大小

Dim n ' 圖片個數

On Error Resume Next ' 忽略錯誤

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 類型圖片

ActiveDocument.InlineShapes(n).Select

Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter ' 居中

ActiveDocument.InlineShapes(n).Width = 28.345 * 14 '設置圖片寬度14厘米

Next n

For n = 1 To ActiveDocument.Shapes.Count 'Shapes 類型圖片

ActiveDocument.Shapes(n).Select

Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter ' 居中

ActiveDocument.Shapes(n).Width = 28.345 * 14 '設置圖片寬度14厘米

Next n

End Sub

需要注意的是：數字那里是可以自己更改的。我這里設置的是14厘米的圖片寬度，高度它會自己適配，不用設置。

3、編輯完代碼后保存，回到Word文檔界面，再按一次【Alt + F8】，這次選擇運行代碼。

圖片瞬間就按照你設置的尺寸自動統一對齊啦！用這種方法多少張圖片都能一鍵搞定。

好啦，今天的Word排版教程就到這。你還有比這更快的排版方法嗎？

總結

以上是生活随笔為你收集整理的图片自动排版php,少为人知的Word自动排版：3秒将1000张图片对齐、固定尺寸的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。