[VB6]Créer un document word

Bonjour,

j'essaie de créer un document word (donc qui n'existe pas) à partir du code d'un bouton en VB, mais je n'y parviens pas.
Pouvez-vous m'aider?

Merci beaucoup.

et c'est quoi ton code ?

ben justement, j'en ai pas!
mis à part la déclaration

Dim objWord As New Word.Application

Code:

---

1 2 3 4 5 6 7 8 9

Sub ouvrirNouveauDocWord() 'necesite d'activer la reference Microsoft Word xx.x Object Library Dim appWrd As Word.Application Dim docWrd As Word.Document Set appWrd = createObject("Word.Application") appWrd.Visible = True Set docWrd = appWrd.Documents.Add docWrd.SaveAs "C:\monDocument.doc" End Sub

---

super, ça marche.Merci beaucoup.
juste un petit problème, je ne souhaite pas sauver ce document mais l'envoyer via attache de mail car c'est un doc qui ne sera pas sur mon disque mais qui sera en possession d'autres personnes.

voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Dim appWrd As Word.Application Dim docWrd As Word.Document Set appWrd = CreateObject("Word.Application") appWrd.Visible = True Set docWrd = appWrd.Documents.Add   Dim outApp As New Outlook.Application Dim Dest As Outlook.Recipient Dim Msg As Outlook.MailItem   Set Msg = outApp.CreateItem(0) Set Dest = Msg.Recipients.Add(adresse mail)   Msg.Attachments.Add (???????)

---

[TAG [VB6] rajouté par Khany]
[Pensez-y vous-même à l'avenir. Merci.:wink: ]

[Balise "Code" rajoutée par Khany]
[Pensez-y vous-même à l'avenir. Merci.:wink: ]