CanvasShapes.AddPicture, méthode (Word)
Ajoute une image à une zone de dessin. Renvoie un objet Shape qui représente l'image et l'ajoute à la collection CanvasShapes.
Syntaxe
expression. AddPicture( _FileName_ , _LinkToFile_ , _SaveWithDocument_ , _Left_ , _Top_ , _Width_ , _Height_ )
expression Obligatoire. Variable qui représente un objet CanvasShapes .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| FileName | Obligatoire | Chaîne | Chemin et nom de fichier de l'image. |
| LienVersFichier | Facultatif | Variant | True pour lier l'image au fichier à partir duquel il a été créé. False pour transformer l'image une copie indépendante du fichier. La valeur par défaut est False. |
| EnregistrerAvecDocument | Facultatif | Variant | True pour enregistrer l'image liée avec le document. La valeur par défaut est False. |
| Left | Facultatif | Variant | Position, exprimée en points, du bord gauche de la nouvelle image par rapport au bord gauche de la zone de dessin. |
| Top | Facultatif | Variant | Position, exprimée en points, du bord supérieur de la nouvelle image par rapport au bord gauche de la zone de dessin. |
| Width | Facultatif | Variant | Largeur de l'image, en points. |
| Height | Facultatif | Variant | Hauteur de l'image, en points. |
Exemple
Cet exemple montre comment ajouter une image à une zone de dessin récemment créée dans le document actif.
Sub NewCanvasPicture()
Dim shpCanvas As Shape
'Add a drawing canvas to the active document
Set shpCanvas = ActiveDocument.Shapes _
.AddCanvas(Left:=100, Top:=75, _
Width:=200, Height:=300)
'Add a graphic to the drawing canvas
shpCanvas.CanvasItems.AddPicture _
FileName:="C:\Program Files\Microsoft Office\" & _
"Office\Bitmaps\Styles\stone.bmp", _
LinkToFile:=False, SaveWithDocument:=True
End Sub
Voir aussi
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.