如何在 Excel 中一次性插入多張圖片並調整它們的大小？

我們可以通過 Excel 的（插入）圖片功能批量插入多張圖片，然後同時調整它們的大小。請按照以下步驟操作：

1. 在工作表中，點擊 插入 > 圖片。

2. 在「插入圖片」對話框中，請打開包含要插入圖片的資料夾，選擇所需的多張圖片，然後點擊 插入 按鈕。參見截圖：
注意：按住 Ctrl 鍵，您可以逐一單擊選擇多個不相鄰的圖片；按住 Shift 鍵，您可以通過單擊第一張和最後一張圖片來選擇多個相鄰的圖片。

現在圖片已批量插入並堆疊在工作表中。

3保持這些圖片被選中，並通過在 寬度 和 高度 框中輸入新的數字來批量調整它們的大小，這些框位於 大小 群組中的 格式 標籤上。參見截圖：

現在所有插入的圖片都已同時調整為相同的大小。

4. 目前您需要手動將每張圖片分別移動到合適的位置。

注意：如果有幾十張圖片堆疊在一起，手動將它們移動到合適的位置將非常耗時。

Kutools for Excel 的 導入圖片 工具可以幫助您根據儲存格大小或圖片大小快速將多張圖片插入 Excel。您還可以根據需要指定圖片的高度和寬度。

1. 點擊 Kutools Plus > 導入/導出 > 導入圖片，參見截圖：

2. 在「導入圖片」對話框中，請執行以下操作：
(1) 從 導入順序 下拉列表中指定圖片的顯示順序，您可以選擇 先行後列 或 先列後行。
(2) 點擊 添加 按鈕選擇要添加到 圖片列表 的圖片文件或目錄。所有您選擇的圖片將列在列表框中。
(3) 點擊 導入大小 按鈕；

3. 現在在「 導入圖片大小」對話框中，您可以選擇符合需求的圖片大小。參見截圖： 4. 指定圖片大小後，請點擊 確定 關閉此對話框，然後返回「導入圖片」對話框，點擊 導入 按鈕以導入圖片。 5. 在新的「導入圖片」對話框中，請選擇要插入圖片的目的範圍的第一個儲存格，然後點擊 確定 按鈕。 目前，所有您選擇的圖片都已從活動儲存格開始垂直或水平插入到您的儲存格中。參見右側截圖：

Kutools for Excel 的 導入圖片 功能旨在根據儲存格大小、指定大小或圖片自身大小，在 Excel 中一次性插入一批圖片。立即免費試用！

為了避免一一手動移動堆疊的圖片，這個方法介紹了另一種技巧，借助 OneNote 插入多張圖片。請按照以下步驟操作：

1. 啟動 OneNote，並創建一個新頁面。然後點擊 插入 > 圖片。

2. 在「插入圖片」對話框中，請打開包含要插入圖片的資料夾，選擇所需的多張圖片，然後點擊 插入 按鈕。參見截圖：
注意：按住 Ctrl 鍵，您可以逐一單擊選擇多個不相鄰的圖片；按住 Shift 鍵，您可以通過單擊第一張和最後一張圖片來選擇多個相鄰的圖片。

3. 按下 Ctrl + A 鍵選擇 OneNote 中所有插入的圖片，然後按下 Ctrl + C 鍵複製它們。

4. 轉到 Excel 的工作表，並按下 Ctrl + V 鍵將圖片粘貼到工作表中。現在所有圖片都如左側截圖所示垂直粘貼。

5. 選擇其中任何一張圖片，然後按下 Ctrl + A 鍵選擇所有圖片。然後通過在 格式 標籤上的 大小 群組中的 寬度 和 高度 框中輸入新的數字來批量調整它們的大小。參見截圖：

現在所有指定的圖片都已插入 Excel 並批量調整為相同的大小。

使用以下 VBA 程式碼，您可以逐個儲存格將多張圖片插入 Excel 文件中。

1. 選擇要插入圖片的目的範圍的第一個儲存格。

2. 按住 ALT + F11 鍵，打開 Microsoft Visual Basic for Applications 窗口。

3. 點擊 插入 > 模組，並將以下宏粘貼到 模組窗口中。

Sub InsertPictures()
'Update 20140513
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. 然後按下 F5 鍵運行程式碼。

5. 在「打開」對話框中，請打開包含要插入圖片的資料夾，選擇要插入的多張圖片，然後點擊 打開 按鈕。所有選擇的圖片都已根據儲存格大小導入到您的選擇中。參見截圖：

Kutools for Excel 還支持強大的 匹配導入圖片 功能，可匹配圖片和儲存格內容，並僅批量插入匹配的圖片到 Excel 中。

1. 選擇您要插入其匹配圖片的圖片名稱儲存格，然後點擊 Kutools Plus > 導入/導出 > 匹配導入圖片。參見截圖：

2. 在彈出的「匹配導入圖片」對話框中，請執行以下操作：
(1) 從 導入順序 下拉列表中指定圖片的顯示順序；
(2) 點擊 添加 按鈕將圖片添加到圖片列表框中。供您參考，只有匹配的圖片會列出。
(3) 然後點擊 導入大小 按鈕。

3. 現在在「 導入圖片大小」對話框中，您可以選擇符合需求的圖片大小，然後點擊 確定 按鈕。參見截圖： 4. 現在您返回到「導入圖片」對話框，點擊導入按鈕以導入圖片。 5. 在彈出的「匹配導入圖片」對話框中，請指定要插入圖片的目的範圍的第一個儲存格，然後點擊 確定 按鈕。參見截圖： 到目前為止，所有圖片都已根據其相對名稱插入到儲存格中。參見右側截圖：

Kutools for Excel 的 匹配導入圖片 功能可以幫助 Excel 使用者快速根據儲存格值篩選圖片，然後批量插入這些圖片。此外，這些匹配的圖片可以自動調整為指定大小或儲存格大小。立即免費試用！

如何在 Excel 中調整圖片大小以適合儲存格？

如何在 Excel 中快速調整多個儲存格大小以適應上方的圖片？