Excel批量圖片自動對齊（Excel把多張圖片排列整齊）

在Excel中的圖片，不知道大家是怎麼處理的？表格中有時需要插入一些圖片來作為輔助，為了資料內容的整齊與美觀，圖片需要統一對齊。那麼對於上千上萬張圖片的一鍵處理方法，今天全部教給你。重點快捷鍵【Ctrl G】

一、一鍵對齊

1、快捷鍵對齊

步驟：按【Ctrl G】開啟定位對話方塊，點選【定位條件】-【物件】-【確定】-【格式】-【對齊】即可。

2、VBA程式碼

我們也可以直接複製下列程式碼，執行也可以達到一鍵對齊所有圖片的效果，且更加實用有效。

程式碼：Sub 圖片對齊()

Dim Shp As Shape

For Each Shp In ActiveSheet.Shapes

Shp.Left = Shp.TopLeftCell.Left

Next Shp

End Sub

二、一鍵刪除

上千張圖片我們又該如何一鍵刪除？

1、快捷鍵刪除

步驟：按【Ctrl G】開啟定位對話方塊，點選【定位條件】-【物件】-【確定】-【Delete】或【Backspace】即可。

2、VBA程式碼

直接複製以下程式碼使用，同樣可以一鍵刪除Excel中所有圖片，無論數量多少。

程式碼：Sub刪除圖片()

Dim Shp As Shape

For Each Shp In ActiveSheet.Shapes

Shp.Delete

Next Shp

End Sub

程式碼統一操作步驟：複製程式碼-點選【開發工具】-【Alt F11】-【插入】-【模組】-貼上程式碼-【執行】即可。