Excel 實用技巧(7)：Excel多張圖片如何居中單元格？

Excel 本身沒有圖片居中的函數，但我們又想把每張圖片居中顯示在單元格，一張一張的手動去拖，既費時效果也不好，那如何做呢？

第一步：
選中需要批量居中的圖片(先選中一張圖片,然後按住 Ctrl+A，即可全選表格內所有圖片)

第二步：
按住 Alt+F11，會彈出一個代碼處理窗口，然後點擊“插入→模塊”

第三步：
在輸入框中粘貼下列代碼

代碼如下

Sub ImageAlignment()

Dim shp As Shape

For Each shp In ActiveSheet.Shapes

Range(shp.TopLeftCell.Areas(1).Item(1).Address).MergeArea

shp.Left = (.Width - shp.Width) / 2 + .Left

shp.Top = (.Height - shp.Height) / 2 + .Top

End With

Next

End Sub

提示：如果複製後每行前面出現多個問號，把所有問號刪掉即可。
然後按下 Ctrl+S 保存代碼，如果提示 無法在未啓用的工作簿中保存以下功能 字樣，點擊“是”即可。

第四步：回到 Excel 窗口
按住 Alt +F8 執行宏 ImageAlignment 操作。

效果圖如下所示

圖片較多的話可能需要稍微等待一兩分鐘，圖片越多，等待時間越長，之後所有被選中的圖片就會被居中對齊了，

版本：Microsoft Office 2016