设置或返回 MsoTriState 类型常数,该常数代表图示的反向状态。可读写。
MsoTriState 可以是下列 MsoTriState 类型常数之一。 |
msoCTrue 不应用于此属性。 |
msoFalse 该图示不反向。 |
msoTriStateMixed 不应用于此属性。 |
msoTriStateToggle 不应用于此属性。 |
msoTrue 该图示反向。 |
expression.Reverse
expression 必选。该表达式返回“应用于”列表中的对象之一。
如果目标图示的 Type 属性是组织结构图(msoDiagramTypeOrgChart 类型),此方法将产生错误。
以下示例创建一个棱锥图,并将该图示的顺序反转。
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