如何在 Excel 中快速調整多個儲存格的大小，讓圖片完美適配？

作者Xiaoyang修改日期2024-08-09

眾所周知，Microsoft Excel 支援自動調整儲存格的行高與列寬，以完美適配填入的內容（例如長字串）。然而，「自動調整行高」與「自動調整列寬」功能對圖片無效，因為插入的圖片並非實際置於特定儲存格內。

使用 VBA 調整儲存格大小以適配圖片

使用 Kutools for Excel 將圖片調整為適配儲存格大小

使用 VBA 調整儲存格大小以適配圖片

假設工作表中包含兩張大型圖片（如下圖所示），您可能希望調整某個儲存格的大小，讓其上方的圖片恰好嵌入其中。該如何實現呢？

調整儲存格大小以符合圖片

當然，您可以手動逐一調整每個儲存格，使其與上方的圖片完美契合，但若圖片數量龐大，這種方式將相當耗時且繁瑣。其實，透過 VB 巨集，我們能一次完成所有儲存格的自動調整，讓它們精準適配各自上方的圖片。請依照下列步驟操作：

步驟 1：按住 ALT + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

步驟 2：點選插入 > 模組，並將下列巨集貼到模組視窗中。

VBA：調整多個儲存格的大小，使其完美適配各自的圖片。

Sub ResizePictureCells()
For Each Picture In ActiveSheet.DrawingObjects
PictureTop = Picture.Top
PictureLeft = Picture.Left
PictureHeight = Picture.Height
PictureWidth = Picture.Width
For N = 2 To 256
If Columns(N).Left > PictureLeft Then
PictureColumn = N - 1
Exit For
End If
Next N
For N = 2 To 65536
If Rows(N).Top > PictureTop Then
PictureRow = N - 1
Exit For
End If
Next N
Rows(PictureRow).RowHeight = PictureHeight
Columns(PictureColumn).ColumnWidth = PictureWidth * (54.29 / 288)
Picture.Top = Cells(PictureRow, PictureColumn).Top
Picture.Left = Cells(PictureRow, PictureColumn).Left
Next Picture
End Sub

步驟 3：按下 F5 鍵，立即執行此巨集！

現在，若目前工作表中包含圖片，其下方的儲存格將自動調整大小，以完美適配上方圖片，如下圖所示：

使用 VBA 程式碼調整儲存格大小以符合圖片

太神奇了！在 Excel 中使用高效 Tabs，就像 Chrome、Edge、Firefox 和 Safari 一樣！
每天為您節省 50% 的時間，並減少數千次滑鼠點擊！

使用 Kutools for Excel 將圖片調整為適配儲存格大小

若您已如以下截圖所示調整好儲存格大小，並希望匯入圖片後自動調整其尺寸以完美適配儲存格，該如何快速完成？此時，Kutools for Excel 的匯入圖片功能可輕鬆幫您搞定！
調整儲存格的大小

安裝 Kutools for Excel 後，請依下列步驟操作：

1. 點選 KUTOOLS PLUS > 匯入/匯出 > 導入圖片。請參閱下圖：

2. 在彈出的導入圖片對話方塊中，先於導入順序區段設定導入順序，再點選新增按鈕，即可從資料夾或檔案逐一加入圖片，並立即在圖片區段中查看已加入的圖片清單。請參閱下圖：
在「匯入圖片」對話方塊中設定選項

3. 點選匯入按鈕後，將顯示匯入圖片尺寸對話方塊，請勾選匹配儲存格大小選項。請參閱下圖：
指定圖片大小

4. 點選確定＞匯入，系統將顯示對話方塊，讓您選取欲匯入圖片的儲存格。請參閱下圖：
選取要插入圖片的儲存格

5. 點選確定，所有圖片將立即匯入至儲存格中，並自動調整尺寸以完美適配儲存格。
所有圖片均已匯入儲存格並符合儲存格大小

相關文章：
如何在 Excel 中將多張圖片插入儲存格？

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多