Notes
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Rogne un pourcentage de la largeur d’une zone de dessin à partir du côté gauche du dessin.
expression. CanvasCropBottom( _Increment_ )
expression Obligatoire. Variable qui représente un objet ShapeRange.
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Increment | Obligatoire | Simple | Montant en points du pourcentage de la largeur de la zone de dessin qui doit rester une fois le dessin rogné. Si vous entrez un incrément de 0,9, le dessin est rogné sur dix pour cent de sa largeur à partir de la gauche. Si vous entrez 0,1, le dessin est rogné sur quatre-vingt-dix pour cent de sa largeur à partir de la gauche. |
Cet exemple montre comment rogner 25 pour cent de la largeur de la zone de dessin à partir de la partie gauche de la première zone de dessin du document actif, en supposant que la première forme du document actif est une zone de dessin. Si ce n'est pas le cas, vous devez ajouter une zone de dessin dans le document à l'aide de la méthode AddCanvas.
Sub CropCanvasLeft()
Dim shpCanvas As Shape
Set shpCanvas = ActiveDocument.Shapes(1)
shpCanvas.CanvasCropLeft Increment:=0.75
End Sub
ShapeRange, Collection d'objets
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.