Excel VBA教程:Reverse属性

MsoTrue 翻转图表中的节点。MsoTriState 类型,可读写。

MsoTriState 可为以下 MsoTriState 常量之一。
msoCTrue  不用于本属性。
msoFalse  不改变图表节点。
msoTriStateMixed  不用于本属性。
msoTriStateToggle  不用于本属性。
msoTrue  翻转图表中的节点。

expression.Reverse

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

Excel VBA教程:Reverse属性·示例

本示例创建一个棱锥图,翻转节点以便将棱锥图底部的节点置于顶部,并将顶部的节点置于底部。


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

上页:Excel VBA教程:ReturnWhenDone属性 下页:Excel VBA教程:ReversePlotOrder属性

Excel VBA教程:Reverse属性

Excel VBA教程:ReversePlotOrder属性 Excel VBA教程:RevisionNumber属性
Excel VBA教程:RGB属性 Excel VBA教程:RightAngleAxes属性
Excel VBA教程:RightFooter属性 Excel VBA教程:RightFooterPicture属性
Excel VBA教程:RightHeader属性 Excel VBA教程:RightHeaderPicture属性
Excel VBA教程:RightMargin属性 Excel VBA教程:RobustConnect属性
Excel VBA教程:RollZoom属性 Excel VBA教程:Root属性
Excel VBA教程:RotatedChars属性 Excel VBA教程:Rotation属性
Excel VBA教程:RotationX属性 Excel VBA教程:RotationY属性
Excel VBA教程:RoundedCorners属性 Excel VBA教程:Routed属性
Excel VBA教程:RoutingSlip属性 Excel VBA教程:Row属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号