Propriété ShapeRange.Child (Excel)

Cette propriété renvoie la valeur msoTrue si la forme spécifiée est une forme enfant ou si toutes les formes contenues dans une plage de formes sont des formes enfants du même parent. Renvoie msoFalse si la forme sélectionnée n’est pas une forme enfant. Renvoie msoTriStateMixed si seules certaines des formes sélectionnées sont des formes enfants. En lecture seule MsoTriState.

Syntaxe

expression. Enfant

Expression Variable qui représente un objet ShapeRange .

Exemple

Cet exemple montre comment sélectionner la première forme dans le dessin et si la forme sélectionnée est une forme enfant, il montre comment remplir la forme avec la couleur spécifiée. Cet exemple suppose qu'une zone de dessin contient plusieurs formes dans la feuille de calcul active.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.