XL 2010 positionner image audessous de page word via excel vba

yahya belbachir · 31 Octobre 2019

Bonjour
comment faire pour positionner une image (gif) au dessous d'une page word via excel,
moi j'ai utilisé ce code:
.Paragraphs.Add
' Ajoute un logo s'il existe (fichier Logo.gif placé dans MesDocuments)
logo2 = ThisWorkbook.Path & "\logo2.gif"

If Exist_Fichier(logo2) Then
.Paragraphs.Add
.InlineShapes.AddPicture (logo2)

End If

ce code affiche bien l'image mais il me l'affiche en haut de la page word,
avez vous une idée?

yahya belbachir · 1 Novembre 2019

tatiak à dit:
Bonjour Yahya,

Il faut d'abord se positionner au dernier paragraphe et insérer l'image dans le "range", soit (code à ajouter en fin de procédure) :

VB:

.Paragraphs.Add With .Paragraphs(.Paragraphs.Count - 1) .Range.InlineShapes.AddPicture (Logo) ' etc ... ' ... End With

tatiak

merci infiniment Monsieur Tatiak,cela fonction très bien

XL 2010 positionner image audessous de page word via excel vba

yahya belbachir

XLDnaute Occasionnel

yahya belbachir

XLDnaute Occasionnel

Discussions similaires