Word) (ShapeRange.Group 方法

群組中指定範圍中的圖案並傳回群組的圖案成為單一 Shape 物件。

語法

運算式。組

需要 expression。 代表 ShapeRange 物件的變數。

註解

由於圖案群組視為單一圖案，因此如果群組或取消群組圖案，將會變更 Shapes 集合中的項目數，也會變更集合中受影響的項目之後的項目索引編號。

範例

本範例將在 myDocument 中新增兩個圖案，並將這兩個新圖案分成一組、設定群組的填滿格式、旋轉該成組圖案，然後將成組圖案傳送至最後一層圖層。

Set myDocument = ActiveDocument 
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 支援與意見反應。