Chart.AutoScaling 属性 (PowerPoint)
如此 如果 Microsoft Word 缩放 3D 图表,使其大小更接近等效的 2D 图表。 RightAngleAxes 属性必须为 True 。 读/写 Boolean。
语法
expression。 AutoScaling
expression:一个表示 Chart 对象的变量。
示例
注意
[!注释] 尽管下面的代码适用于 Microsoft Word,但您可以轻松地对其进行修改以将其应用于 PowerPoint。
以下示例会自动缩放活动文档中的第一个图表。 本示例应在 3D 图表上运行。
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.RightAngleAxes = True
.Chart.AutoScaling = True
End If
End With
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。