Propriedade ShapeRange.GroupItems (Excel)
Retorna um objeto GroupShapes que representa as formas individuais no grupo especificado. Use o método Item do objeto GroupShapes para retornar uma única forma do grupo. Aplica-se a objetos ShapeRange representam formas agrupadas. Somente leitura.
Sintaxe
expressão. GroupItems
Expressão Uma variável que representa um objeto ShapeRange .
Exemplo
Este exemplo adiciona três triângulos ao myDocument, agrupa-os, define uma cor para todo o grupo e altera a cor apenas para o segundo triângulo.
Set myDocument = Worksheets(1)
With myDocument.Shapes
.AddShape(msoShapeIsoscelesTriangle, _
10, 10, 100, 100).Name = "shpOne"
.AddShape(msoShapeIsoscelesTriangle, _
150, 10, 100, 100).Name = "shpTwo"
.AddShape(msoShapeIsoscelesTriangle, _
300, 10, 100, 100).Name = "shpThree"
With .Range(Array("shpOne", "shpTwo", "shpThree")).Group
.Fill.PresetTextured msoTextureBlueTissuePaper
.GroupItems(2).Fill.PresetTextured msoTextureGreenMarble
End With
End With
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.