Skip to main content

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

Author: Sun Last Modified: 2025-05-12

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

在 Word 中手動調整圖片大小

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

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


在 Word 中手動調整圖片大小

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

    Illustration: Drag the sizing handle

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


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

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

Kutools for Word內建人工智慧 ?,提供超過 100 種實用功能,簡化您的工作流程。
  • 要將所有圖片調整為原始尺寸的特定百分比:
    • 點擊 Kutools Plus > 調整大小,並從下拉列表中選擇六個百分比之一。例如,選擇 50% 將所有圖片調整為其原始尺寸的一半。

      Illustration: Resize all pictures to 50% of their original size

  • 要將所有圖片調整為與選定圖片相同的尺寸:
    1. 選擇一張圖片作為模型尺寸。
    2. 點擊 Kutools Plus > 調整大小 > 調整為選圖大小。所有圖片都將調整為與所選圖片相同的尺寸。

      Illustration: Resize all pictures to the size of the selected picture

  • 如果您需要更多具體的選項,請點擊 Kutools Plus > 調整大小 > 自定義以訪問高級調整大小設置。

    Illustration: Resize all pictures with advanced resizing settings

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

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

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

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

  1. 請選擇您要調整大小的圖片。
  2. 按下 Alt + F11 開啟 Microsoft Visual Basic for Applications 視窗。
  3. 點擊 模組插入 標籤,並將以下 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) 定義了圖片的高度和寬度(以英吋為單位)。您可以根據需要更改這些值。

  4. 點擊執行按鈕或按下 F5 鍵運行程式碼。所選圖片將被調整為指定的尺寸。

雖然此 VBA 程式碼很有用,但它無法一次調整所有或多張圖片的大小。您需要在 Word 文件和 Microsoft Visual Basic for Applications 視窗之間來回切換,以選擇和調整每張圖片的大小,這可能非常耗時。在這種情況下,請使用 Kutools 方法


示範:如何在 Word 中調整圖片大小

在這段來自 Kutools for Word 的影片中探索 Kutools / Kutools Plus 標籤。享受 100+ 項功能以及永久免費的 AI 工具。立即下載!


最佳辦公效率工具

Kutools for Word - 透過超過 100 項卓越功能提升您的 Word 體驗!

🤖 Kutools AI 功能AI助手 / 即時助手 / 超級潤色(保留格式)/ 超級翻譯(保留格式)/ AI遮擋 / AI校正...

📘 文件精通拆分頁面 / 合併文檔 / 以多種格式導出選擇內容(PDF/TXT/DOC/HTML...)/ 批量轉換為 PDF...

內容編輯跨多個文件進行批量查找和替換 / 調整所有圖片大小 / 翻轉表格的行與列 / 表格轉文本...

🧹 輕鬆清理:清除多餘空格 / 分節符 / 文本框 / 超鏈接 / 更多清除工具,請前往“清除”組...

創意插入:插入千位分隔符 / 複選框 / 選項按鈕 / 二維碼 / 條形碼 / 多張圖片 / 在“插入”組中發現更多...

🔍 精確選擇:精準定位特定頁面 / 表格 / 形狀 / 標題段落 / 使用更多選擇 ”功能增強導航...

星級增強功能跳轉至任意位置 / 自動插入重複文本 / 在文檔窗口之間切換 / 11 轉換工具...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 想要試用這些功能嗎?立即下載 Kutools for Word!🚀
 

最佳辦公效率工具

Kutools for Word - 100+ Word 工具