Discussion :

[kima9]

Salut,

Je travaille avec visual basic 2008 et je veux quand je clique sur un bouton me générer un fichier word.
j'arrive bien a ouvrir le fichier et a écrire dedans mais j'aimerais bien y inserer une image

j'utilise le code suivant:

Code :

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

1
2
3
 
oDoc = oWord.Documents.Add
oDoc1.AddPicture(FileName:="C:\Documents and Settings\logo.jpeg", LinkToFile:=False, SaveWithDocument:=True)

mais je sais pas de quel type doit etre déclaré le oDoc1(Dim oDoc As Word.Document mais pour oDoc1 j'ai essayé Dim oDoc1 As Word.Pictureformat mais ça ne donne rien)


merci

[kima9]

j'ai pu résoudre ceci on utilisant

Code :

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

Dim oShape1 As Word.InlineShape

mais le nouveau problème qui se pose que dès que j'ajoute du texte l'image disparait et le texte vient à sa place.
comment indiquer que je veux le texte aprés l'image?

[l0quito]

Je n'est aucune solution complète pour toi, mais une fois j'ai du travail du VSTO sur Excel et il fallai séléctionner les cellules touchées.

Tu n'as pas la possibilités de compter les lignes? ou au moin d'avoir un repère (je suis sur la première page, deuxième ; permière lignes, lignes N°125 ect..)?

[kima9]

je vois bien de quoi vous parlez car j'ai déjà travaillé avec excel mais en ce qui concerne word ce n'est pas la meme chose.
En cherchant j'ai trouvé "insert paragraphe after" mais je vais essayer si ça marche.
merci comme meme

[Sankasssss]

Tu fais comment pour insèrer du text dans ton word?

[kima9]

j'utilise le code suivant

Code :

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

1
2
3
4
oRng = oDoc.Bookmarks.Item("\endofdoc").Range
        oRng.InsertParagraphAfter()
        oRng.InsertAfter("dfghg" + Me.txt_NomCli.Text)
        oRng.Font.Bold = True