Macros excel: Erreur fichier introuvableRésolu

Question

Bonjour,
j'aimerais créer une macro toute bete qui m'ouvre un fichier word depuis excel. Mais j'obtiens toujours le message d'erreur 5174 ( Fichier introuvable ).
Voici mon code:

Sub ouvrirefichier()
Dim appWD As Word.Application
Set appWD = CreateObject("Word.Application") ' un objet word est créé
appWD.Documents.Open Filename:="C:\dede.doc"
appWD.Quit ' je quitte Word
End Sub

Pourtant le fichier dede.doc existe bien dans C:.
Je précise que j'ai activé l'utilisation des macros dans excel et dans word et que je suis débutant.
Une idée d'où peut venir le problème?

ucfoutu · Accepted Answer

Bonjour,
Pourquoi te forcer à une référence si, finalement, tu fais du Late Binding ?

Ceci marche bien chez moi :
Dim appWD As Object
Set appWD = CreateObject("Word.Application") ' un objet word est créé
appWD.Documents.Open filename:="D:\MONOUTIL\SELAIDE.doc"
appWD.Quit ' je quitte Word

Si ne marche pas chez toi, c'est que ton fichier n'est pas accessible.
Ce peut être le cas sous WINDOWS 7, par exemple (pastouche au répertoire C)

____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

babsh · Answer

Euh c&#180;est quoi du late binding?
En fait j&#180;ai réussi à résoudre le problème:
Si je crée un nouveau fichier dede.docm avec un type de fichier "document word avec macro", alors je peux ouvrir ce fichier avec le code cité plus haut (en changeant bien sûr "dede.doc" en "dede.docm")

Macros excel: Erreur fichier introuvable

2 réponses

Votre réponse

Discussions similaires