将集合中指定的形状移动到其他形状前面或后面(也就是说,改变形状在 Z 顺序中的位置)。
expression.ZOrder(ZOrderCmd)
expression 必选。该表达式返回一个 Shape 对象。
ZOrderCmd 必选。MsoZOrderCmd 类型。指定所指定形状相对于其他形状移动的位置。
MsoZOrderCmd 可以是下列 MsoZOrderCmd 类型常数之一。 |
msoBringForward |
msoBringInFrontOfText 仅用于 Microsoft Word。 |
msoBringToFront |
msoSendBackward |
msoSendBehindText 仅用于 Microsoft Word。 |
msoSendToBack |
使用 ZOrderPosition 属性判断一个形状在 Z 顺序中的当前位置。
本示例向 myDocument
中添加椭圆,如果幻灯片中有至少一个其他形状,则将该椭圆放置在 Z 顺序中倒数第二的位置上。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddShape(msoShapeOval, 100, 100, 100, 300)
While .ZOrderPosition > 2
.ZOrder msoSendBackward
Wend
End With