PowerPoint) (ShapeRange.Group 方法

組合指定範圍中的圖案。 將組成群組的圖案當做單一 Shape 物件傳回。

語法

運算式。組

表達 代表 ShapeRange 物件的 變數。

傳回值

圖形

註解

因為圖案群組被視為單一圖案，因此將圖案分組或取消圖案群組將變更 Shapes 集合中的項目數目，並改變集合中受影響的圖案之後的各項目索引編號。

範例

本範例會將兩個圖形新增至 myDocument、將兩個新圖形分組、設定群組的填滿、旋轉群組，以及將群組傳送至繪圖層的背面。

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes

    .AddShape(msoShapeCan, 50, 10, 100, 200).Name = "shpOne"

    .AddShape(msoShapeCube, 150, 250, 100, 200).Name = "shpTwo"

    With .Range(Array("shpOne", "shpTwo")).Group

        .Fill.PresetTextured msoTextureBlueTissuePaper

        .Rotation = 45

        .ZOrder msoSendToBack

    End With

End With

另請參閱

ShapeRange 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。