Partager via

Propriété ShapeRange.AutoShapeType (Excel)

  • Article

Renvoie ou définit le type de forme pour l’objet Shape ou ShapeRange spécifié, qui doit représenter une forme automatique autre qu’un trait, un dessin de forme libre ou un connecteur. Type de données MsoAutoShapeType en lecture-écriture.

Syntaxe

expression. AutoShapeType

Expression Variable qui représente un objet ShapeRange .

Remarques

Quand vous modifiez le type d'une forme, celle-ci conserve sa taille, sa couleur et autres attributs.

Utilisez la propriété Type de l’objet ConnectorFormat pour définir ou renvoyer le type de connecteur.

Exemple

Cet exemple montre comment remplacer toutes les étoiles à 16 branches par des étoiles à 32 branches dans myDocument.

Set myDocument = Worksheets(1) 
For Each s In myDocument.Shapes 
    If s.AutoShapeType = msoShape16pointStar Then 
        s.AutoShapeType = msoShape32pointStar 
    End If 
Next

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.