Discussion :

[amina1987]

bonjour!


word vba insérer une image dans chaque page

cette commande permet d’insérer une image à l'endroit de selection :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Selection.InlineShapes.AddPicture FileName:="G:\image.jpg", LinkToFile:= _
        False, SaveWithDocument:=True

cette commande permet d'inserer une image dans le document + positionnement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 Set pic = ActiveDocument.Shapes.AddPicture(FileName:=file, _
            LinkToFile:=True, SaveWithDocument:=msoFalse, Left:=150, Top:=-20, Width:=70, Height:=90)

y'aurait-t-il une commande qui permet d’insérer une image dans chaque page du document en précisant le positionnement ????

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
genre  :   Set pic = activePage.Shapes.AddPicture(FileName:=file, _
            LinkToFile:=True, SaveWithDocument:=msoFalse, Left:=150, Top:=-20, Width:=70, Height:=90)

activepage.shape.addpicture n'existe pas ..


que ce que je peux faire pour réaliser ça?? insérer une image dans chaque page du document en précisant le positionnement




y'a-t-il un moyen pour préciser la page et le positionnement pour insérer l'image


POUR PLUS DE DETAILS : j'ai utilisé la fonction de fusion et publipostage pour créer des cartes d'identification de produit , il ne manque que la photo qui correspond à chaque produit => donc à chaque page; il me reste à pouvoir utiliser :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Set pic = activePage.Shapes.AddPicture(FileName:=file, _
            LinkToFile:=True, SaveWithDocument:=msoFalse, Left:=150, Top:=-20, Width:=70, Height:=90)

mais celle-là marche pas.

[78chris]

Bonjour


De façon générale, soit on insère l'image dans le texte entre tel et tel paragraphe et il n'y a pas de positionnement à préciser, soit une place une image flottante (souvent source de problème) et on précise sa position et un ancrage.

Il serait sans doute tout aussi efficace d'insérer l'image par lien dans le document type et de rompre les liens en fin de fusion.

Pour insérer l'image dans le document type mettre le nom du fichier dans la source de données et une champ INCLUDEIMAGE où sera glissé le MERGEFILELD ce qui donne pour un champ nommé image

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

{ INCLUDEPICTURE  "{ MERGEFIELD Image }" \x \y  \* MERGEFORMAT }

A noter que, d'après mes tests, l'image est déformée et il fautv rétablir la taille.

[amina1987]

merci beaucoup pour la réponse. normalement ça devrait marcher