Shapes.AddPicture, méthode (Word)

Article
08/03/2023

Ajoute une image à un document. Renvoie un objet Shape qui représente l’image et l’ajoute à la collection Shapes .

Syntaxe

expression. AddPicture (FileName, LinkToFile, SaveWithDocument, Left, Top, Width, Height, Anchor)

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

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.
Anchor	Facultatif	Range	Plage dans le document.

Valeur renvoyée

Shape

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

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.

Partager via