Propriété BorderArtFormat.StretchPictures (Publisher)

True pour étirer le bordure d'image constituant la bordure spéciale spécifiée en fonction de la forme à laquelle elle est appliquée. Boolean (en lecture/écriture).

Syntaxe

expression. StretchPictures

expression Variable qui représente un objet BorderArtFormat .

Valeur renvoyée

Booléen

Remarques

Renvoie « Autorisation refusée » si aucune bordure spéciale n’a été appliquée à l’objet spécifié.

Correspond aux images Ne pas étirer et Étirer les images pour ajuster les contrôles dans la boîte de dialogue BorderArt .

Exemple

L'exemple suivant vérifie l'existence de bordures spéciales sur chaque forme de chaque page du document actif. S'il en existe, elles sont définies afin de pouvoir être étendues.

Sub StretchBorderArt() 
 Dim anyPage As Page 
 Dim anyShape As Shape 
 
 For Each anyPage in ActiveDocument.Pages 
 For Each anyShape in anyPage.Shapes 
 With anyShape.BorderArt 
 If .Exists = True Then 
 .StretchPictures = True 
 End If 
 End With 
 Next anyShape 
 Next anyPage 
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.