运行vba图片会偏置不会居中

旧版本号：12.8.2.17149 新版本号：12.8.2.18205 社区限制，无法直接发送代码，只能看图旧版本号运行模块，图片居中正常（图1），更新到新的版本号之后，图片会跑到两行中间去居中（图2）请问是版本问题还是vba编写问题？尝试过变更公式写法，效果也一样

10小时前广东省

全部评论 4

星辰

旧版本才行，新版本BUG

5小时前 · 东京都

会飞的鱼

WPS函数专家

新版本的WPS问题这个问题在近期两个版本内会修复，过两个月更新WPS即可。目前只能先回退到17150版本这里有下载链接 https://bbs.wps.cn/topic/39091

7小时前 · 辽宁省

[柠檬少年凉堇年゛]

原代码： Sub 单个单元格图片居中对齐() 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

10小时前 · 广东省

[柠檬少年凉堇年゛]

shp.Left = shp.TopLeftCell.Left + (shp.TopLeftCell.Width - shp.Width) / 2 shp.Top = shp.TopLeftCell.Top + (shp.TopLeftCell.Height - shp.Height) / 2 公式变更成这样，效果也一样要跑到两行去居中

10小时前 · 广东省

[柠檬少年凉堇年゛]

帖子 1
回复 2
点赞 1