Propriedade ShapeRange.Child (Excel)
Retorna msoTrue se a forma especificada for uma forma filha ou se todas as formas em um intervalo de formas forem formas filhas de um mesmo pai. Retornará msoFalse se a forma selecionada não for uma forma filho. Retorna msoTriStateMixed se apenas algumas das formas selecionadas forem formas filho. MsoTriState somente leitura.
Sintaxe
expressão. Criança
Expressão Uma variável que representa um objeto ShapeRange .
Exemplo
Este exemplo seleciona a primeira forma na tela e, se a forma selecionada for uma forma filha, preenche-a com a cor especificada. O exemplo supõe que uma tela de desenho contenha várias formas na planilha ativa.
Sub FillChildShape()
'Select the first shape in the drawing canvas.
ActiveSheet.Shapes(1).CanvasItems(1).Select
'Fill selected shape if it is a child shape.
If Selection.ShapeRange.Child = msoTrue Then
Selection.ShapeRange.Fill.ForeColor.RGB = RGB(100, 0, 200)
Else
MsgBox "This shape is not a child shape."
End If
End Sub
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.