Ouvrir Word à partir de VBARésolu

Question

Bonjour tout le monde, je voudrais ouvrir un document Excel à partir de Vidual Basic.

J'ai rédigé le code suivant, mais lorsque je le lance il ne se passe rien. Si je le lance une seconde fois un message d'erreur apparait en me disant que le document est déjà ouvert 





Sub Ouvrir_Doc()
Mon_Doc = "C:\Users\Stéphane\Documents\Master2 AE_iae\Systemes_Information\Exposé\Enveloppe.doc"
Num_Fichier = FreeFile




Open Mon_Doc For Append As Num_Fichier<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" /??>






End Sub






 



Que dois-je rajouter pour que mon document Word s'affiche à l'écran

cs_Orohena · Accepted Answer

Salut

En fait, il ne faut pas ouvrir le document, mais l'application Word.



Dim wordApp
Set WordApp = CreateObject("Word.Application")
With WordApp
   .Visible = True
   ..documents.Open ("C:\...\enveloppe.doc")
End With
...
Set WordApp = Nothing   ' libère les ressources


Amicalement

cs_Orohena · Answer

Oups, remplace ..Documents par .Documents

stephx06 · Answer

Ca marche !!!!!!
Merci !!!!!!

Ouvrir Word à partir de VBA

3 réponses

Votre réponse

Discussions similaires