Propriété Shape.AutoShapeType (Word)

  • Article

Renvoie ou définit le type de forme pour l'objet Shape spécifié, qui doit représenter une forme automatique différente d'un trait ou d'une forme libre. Type de données MsoAutoShapeType en lecture/écriture.

Syntaxe

expression. AutoShapeType

expression Obligatoire. Variable qui représente un objet Shape.

Remarques

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

Exemple

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

Sub ReplaceAutoShape() 
 Dim docNew As Document 
 Dim shpStar As Shape 
 Set docNew = ActiveDocument 
 For Each shpStar In docNew.Shapes 
 If shpStar.AutoShapeType = msoShape16pointStar Then 
 shpStar.AutoShapeType = msoShape32pointStar 
 End If 
 Next 
End Sub

Voir aussi

Shape, objet

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.