willsonlincake 发表于 2022-5-10 22:19:16

VBA设置当前图形文本居中对齐

Sub Sample()
ActiveWindow.Selection.ShapeRange.TextFrame.VerticalAnchor = msoAnchorMiddle
End Sub



页: [1]
查看完整版本: VBA设置当前图形文本居中对齐