Excel将插入的图片在单元格居中代码
一、选中需要居中的图片(ALT+A全选)
二、按ALT+F11打开Microsoft Visual Basic for Applications窗口:
1、点击:插入-模块:
2、输入代码:
Sub dq() Dim shp As Shape For Each shp In ActiveSheet.Shapes shp.Left = (shp.TopLeftCell.Width - shp.Width) / 2 + shp.TopLeftCell.Left shp.Top = (shp.TopLeftCell.Height - shp.Height) / 2 + shp.TopLeftCell.Top Next End Sub
3、直接关闭窗口。
三、按ALT+F8,打开宏命令窗口:
四、执行dq宏命令。
五、完。
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 微软正式发布.NET 10 Preview 1:开启下一代开发框架新篇章
· 没有源码,如何修改代码逻辑?
· PowerShell开发游戏 · 打蜜蜂
· 在鹅厂做java开发是什么体验
· WPF到Web的无缝过渡:英雄联盟客户端的OpenSilver迁移实战