AutoFormat 属性 - Microsoft Excel Visual Basic 2002 参考

返回介绍

AutoFormat 属性

发布于 2019-08-07 字数 1655 浏览 944 评论 0

全部显示

AutoFormat 属性

设置或返回一个 MsoTriState 常量,该常量指示图表的自动格式设置状态。可读写。







MsoTriState 可为以下 MsoTriState 常量之一。
msoCTrue 不应用于本属性。
msoFalse 禁用图表的自动格式设置。
msoTriStateMixed 不应用于本属性。
msoTriStateToggle 不应用于本属性。
msoTrue 启用图表的自动格式设置。

expression.AutoFormat

expression 必需。该表达式返回“应用于”列表中的对象之一。

示例

本示例在当前文档中创建一个图表,并打开该图表的自动格式设置。

Sub CreatePyramidDiagram()
    Dim dgnNode As DiagramNode
    Dim shpDiagram As Shape
    Dim intCount As Integer
    'Add a pyramid diagram to current document
    Set shpDiagram = ActiveSheet.Shapes.AddDiagram( _
        Type:=msoDiagramPyramid, _
        Left:=10, _
        Top:=15, _
        Width:=400, _
        Height:=475)
    'Add first child node
    Set dgnNode = shpDiagram.DiagramNode.Children.AddNode
    'Add three more child nodes
    For intCount = 1 To 3
        dgnNode.AddNode
    Next intCount
    'Enable automatic formatting for the diagram and convert
    'it to a radial diagram
    With dgnNode.Diagram
        .AutoFormat = msoTrue
        .Convert Type:=msoDiagramRadial
    End With
End Sub

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!