Discussion :

[modus vivendi]

Bonjour,

Je cherche à ouvrir des documents Word et en en particulier des modèles (template) Word depuis Excel.

J'imagine que la solution commence par :

Application.ActivateMicrosoftApp xlMicrosoftWord

mais je n'arrive pas à trouver la suite

Merci de votre aide

[SilkyRoad]

bonjour

j'espere que cet exemple pourra t'aider

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Sub ouvrirModeleWord()
'necessite d'activer la reference Microsoft Word Object Library
Dim wordApp As Word.Application
Dim wordDoc As Word.Document
 
Set wordApp = CreateObject("word.application")
wordApp.Visible = True
Set wordDoc = wordApp.Documents.Open("C:\monModele.dot")
'
'......
'
End Sub

bonne journée
michel