PowerPoint VBA教程:Reverse属性

设置或返回MsoTriState 类型常数,该常数代表图示的反向状态。可读写。

MsoTriState 可以是下列 MsoTriState 类型常数之一。
msoCTrue 不应用于此属性。
msoFalse 该图示不反向。
msoTriStateMixed 不应用于此属性。
msoTriStateToggle 不应用于此属性。
msoTrue 该图示反向。

expression.Reverse

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

说明

如果目标图示的Type属性是组织结构图(msoDiagramTypeOrgChart 类型),此方法将产生错误。

VBA示例

以下示例创建一个棱锥图,并将该图示的顺序反转。


Sub ReversePyramidDiagram()
    Dim dgnNode As DiagramNode
    Dim shpDiagram As Shape
    Dim intNodes As Integer
    'Adds a pyramid diagram and first child node
    Set shpDiagram = ActivePresentation.Slides(1).Shapes.AddDiagram _
        (Type:=msoDiagramPyramid, Left:=10, Top:=15, _
        Width:=400, Height:=475)
    Set dgnNode = shpDiagram.DiagramNode.Children.AddNode
    'Adds three additional nodes to diagram
    For intNodes = 1 To 3
        dgnNode.AddNode
    Next intNodes
    'Automatically places nodes, and reverses node order
    With dgnNode.Diagram
        .AutoLayout = msoTrue
        .Reverse = msoTrue
    End With
End Sub

上页:PowerPoint VBA教程:Restart属性 下页:PowerPoint VBA教程:RewindAtEnd属性

PowerPoint VBA教程:Reverse属性

PowerPoint VBA教程:RewindAtEnd属性 PowerPoint VBA教程:RewindMovie属性
PowerPoint VBA教程:RGB属性 PowerPoint VBA教程:Root属性
PowerPoint VBA教程:RotatedChars属性 PowerPoint VBA教程:Rotation属性
PowerPoint VBA教程:RotationEffect属性 PowerPoint VBA教程:RotationX属性
PowerPoint VBA教程:RotationY属性 PowerPoint VBA教程:Rows属性
PowerPoint VBA教程:Ruler属性 PowerPoint VBA教程:Run属性
PowerPoint VBA教程:Saved属性 PowerPoint VBA教程:SaveNewWebPagesAsWebArchives属性
PowerPoint VBA教程:ScaleEffect属性 PowerPoint VBA教程:SchemeColor属性
PowerPoint VBA教程:ScreenSize属性 PowerPoint VBA教程:ScreenTip属性
PowerPoint VBA教程:Script属性 PowerPoint VBA教程:Scripts属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号