隨著手機功能的不斷豐富，我們在日常生活中越來越依賴于它們。因此，學會利用VBA批量調整圖片適合單元格大小將會極大地提高我們工作效率。本文將介紹如何利用VBA編輯器和一些簡單的代碼來實現(xiàn)這一目標。 在V

隨著手機功能的不斷豐富，我們在日常生活中越來越依賴于它們。因此，學會利用VBA批量調整圖片適合單元格大小將會極大地提高我們工作效率。本文將介紹如何利用VBA編輯器和一些簡單的代碼來實現(xiàn)這一目標。

在VBA編輯器中打開模塊

首先，在Excel開發(fā)工具中打開VBA編輯器，插入一個新的模塊。接下來，您可以在單元格區(qū)域中輸入一些內容作為例子。

插入并運行VBA代碼

在新建的模塊中輸入以下VBA代碼：

```VBA

Sub 使圖片適合單元格()

Dim Pic As Picture, i As Long

i [C65536].End(xlUp).Row

For Each Pic In

Cells(i, 3).Top '設置上邊距

Pic.Left Cells(i, 3).Left '設置左邊距

Pic.Width Cells(i, 3).Width '設置寬度

Pic.Height Cells(i, 3).Height '設置高度

'選擇圖片

With Selection

.Placement xlMoveAndSize '隨單元格移動和調整大小

.PrintObject True '讓圖片可打印

End With

i i 1

Next

End Sub

```

然后運行此代碼，即可實現(xiàn)將圖片適配到單元格大小的效果。

執(zhí)行宏

使用快捷鍵Alt F8調出“運行宏”窗口，選擇剛剛創(chuàng)建的宏并點擊“執(zhí)行”，這樣，C列中的參差不齊的圖片就會立即調整為適合單元格大小了。

以上就是利用VBA批量調整圖片適合單元格大小的方法，通過簡單的代碼和操作，可以大幅提高工作效率。希望對您有所幫助！