insérer une image dans un document word

bonsoir communauté developpez.com
je vous remercie infiniment pour l'aide précieuse que vous m'avez apporté
je reviens pour vous poser un autre problème

j'utilise le code suivant pour insérer une image au niveau d'un signet

Code:

---

MonWd.InlineShapes.AddPicture(FileName:=Application.StartupPath & "\compte-rendu_word\image.bmp", range:=MonWd.Bookmarks("signet").Range, LinkToFile:=False, SaveWithDocument:=True)

---

l'image est insérée mais le texte du signet reste visible

si j'essaie de supprimer le signet, en utilisant le code suivant:

Code:

---

MonWd.Bookmarks("signet").Range.Text = ""

---

l'image et le signet disparaissent!!!!! :(

Comment insérer l'image au niveau d'un signet en supprimant le texte du signet?

Bonsoir,
et si tu fais d'abord :

Code:

---

MonWd.Bookmarks("signet").Range.Text = ""

---

puis ca :

Code:

---

MonWd.InlineShapes.AddPicture(FileName:=Application.StartupPath & "\compte-rendu_word\image.bmp", range:=MonWd.Bookmarks("signet").Range, LinkToFile:=False, SaveWithDocument:=True)

---

???

malheureusement , cela ne fonctionne pas et génère une erreur vu que le signet est supprimé par la première instruction

je pense plutôt à chercher le texte du signet le sélectionner puis le supprimer.
mais je ne sais pas comment le faire.

et pourquoi tu mets du texte dans tes signets?
Tu peux faire des signets sans texte...

merci
ca marche :ccool: