Bonjour à tous et à toutes

Je cherche à ouvrir un fichier word depuis excel, avec un code qui fonctionne pourtant bien dans d'autres applis

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub CommandButton1_Click()
Dim Dossier, NomFich As String
Dossier = Workbooks("Plaquette.xls").Worksheets("Plaquette").Range("B4").Value
NomFich = Workbooks("Plaquette.xls").Worksheets("Plaquette").Range("B5").Value
 
Const wdStory = 6
Const wdMove = 0
Set Objword = CreateObject("Word.Application")
 
Objword.Visible = True
Set objdoc = Objword.Documents.Open("e:\Etat réserves non levées.doc")
 
End Sub



Au final, quand je lance le code, j'ai un message d'erreur "Erreur de compilation - variable non définie" pour "Objword"
J'ai pourtant bien coché sur "Microsoft Word 12.0...." dans Outils/Références

Je ne comprends pas ....

Merci de votre aide

Daniel S.