绕水平或垂直轴翻转指定的形状。
expression.Flip(FlipCmd)
expression 必选。该表达式返回一个 Shape 或 ShapeRange 对象。
FlipCmd 必选。MsoFlipCmd 类型。指定该形状是水平翻转还是垂直翻转。
MsoFlipCmd 可以是下列 MsoFlipCmd 类型常数之一。 |
msoFlipHorizontal |
msoFlipVertical |
本示例将一个三角形添加到 myDocument
,复制该三角形,再垂直翻转复制的三角形并使之变红。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes _
.AddShape(msoShapeRightTriangle, 10, 10, 50, 50).Duplicate
.Fill.ForeColor.RGB = RGB(255, 0, 0)
.Flip msoFlipVertical
End With