【Excel 教程系列第 7 篇】多张图片如何居中单元格？

这是【Excel 教程系列第 7 篇】，如果觉得有用的话，欢迎关注专栏。

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

你的问题得到解决了吗？欢迎在评论区留言。

赠人玫瑰，手有余香，如果觉得文章不错，希望可以给个一键三连，感谢。

---

结束语

技术是一点一点积累的，大神也不是一天就可以达到的。原地不动就是退步，所以每天进步一点点。

最后，附上一句格言："好学若饥，谦卑若愚"，望共勉。