如何在 Word 中調整所有/多張圖片的大小？

Author: Sun Last Modified: 2025-08-06

從網路或其他文件複製或匯入圖片時，這些圖片的尺寸可能會有很大差異。雖然逐一手動調整圖片大小是一項常見任務，但對多張圖片進行此操作可能會非常耗時。本教程將引導您了解幾種方法，從調整單張圖片開始，然後介紹有效調整多張圖片大小的技巧。

在 Word 中手動調整圖片大小

使用 Kutools for Word 一次調整多張圖片大小

使用 VBA 將圖片調整為特定尺寸

在 Word 中手動調整圖片大小

選取一張圖片以顯示其調整大小的控制點。
拖動任何調整大小的控制點，直到圖片達到您想要的尺寸。

注意：此方法不允許您同時調整多張圖片的大小。您需要逐一手動調整每張圖片的大小。

使用 Kutools for Word 批量調整所有圖片大小

使用 Kutools for Word 的 調整圖片大小功能提供了一種無縫方式來調整文檔中所有圖片的大小，相比在 Word 中逐一手動調整圖片，這可以節省您的時間和精力。此功能讓您可以快速高效地批量調整圖片大小。

Kutools for Word，內建人工智慧 🤖，提供超過 100 種實用功能，簡化您的工作流程。

立即下載

要將所有圖片調整為原始尺寸的特定百分比：
- 點擊 Kutools Plus > 調整大小，並從下拉列表中選擇六個百分比之一。例如，選擇 50% 將所有圖片調整為其原始尺寸的一半。
要將所有圖片調整為與選定圖片相同的尺寸：
1. 選擇一張圖片作為模型尺寸。
2. 點擊 Kutools Plus > 調整大小 > 調整為選圖大小。所有圖片都將調整為與所選圖片相同的尺寸。
如果您需要更多具體的選項，請點擊 Kutools Plus > 調整大小 > 自定義以訪問高級調整大小設置。

有關 Kutools for Word 的調整圖片大小功能的更多詳細信息，請點擊這裡閱讀完整指南並查看逐步說明。

Kutools for Word 是終極的 Word 增益工具，能夠簡化您的工作並提升文檔處理技能。立即獲取！

使用 VBA 將圖片調整為特定尺寸

使用以下 VBA 程式碼，您可以將圖片調整為理想的尺寸。下面的範例展示了如何將圖片的高度調整為 1.78 英吋，寬度調整為 3.17 英吋。

請選擇您要調整大小的圖片。
按下 Alt + F11 開啟 Microsoft Visual Basic for Applications 視窗。

點擊模組從插入標籤，並將以下 VBA 程式碼複製並貼到模組視窗中。

Sub ResizePics()
Dim shp As Word.Shape
Dim ishp As Word.InlineShape
If Word.Selection.Type <> wdSelectionInlineShape And _
Word.Selection.Type <> wdSelectionShape Then
    Exit Sub
End If
If Word.Selection.Type = wdSelectionInlineShape Then
    Set ishp = Word.Selection.Range.InlineShapes(1)
    ishp.LockAspectRatio = False
    ishp.Height = InchesToPoints(1.78)
    ishp.Width = InchesToPoints(3.17)
Else
    If Word.Selection.Type = wdSelectionShape Then
        Set shp = Word.Selection.ShapeRange(1)
        shp.LockAspectRatio = False
        shp.Height = InchesToPoints(1.78)
        shp.Width = InchesToPoints(3.17)
    End If
End If
End Sub

注意：在上述程式碼中，ishp.Height = InchesToPoints(1.78) 和 shp.Width = InchesToPoints(3.17) 定義了圖片的高度和寬度（以英吋為單位）。您可以根據需要更改這些值。