[RESOLU] Macros excel: Erreur fichier introuvable

  • Initiateur de la discussion Initiateur de la discussion babsh
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

B

babsh

Guest
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?
 
Dernière modification par un modérateur:
Re : Macros excel: Erreur fichier introuvable

Bonjour babsh, bienvenue sur XLD,

Pourquoi le double slash ??? Ceci fonctionne chez moi :

Code:
Sub ouvrirfichier()
Dim appWD As Object
Set appWD = CreateObject("Word.Application") ' un objet word est créé
appWD.Documents.Open Filename:="C:\dede.doc"
appWD.Quit ' je quitte Word
End Sub
A+
 
Re : Macros excel: Erreur fichier introuvable

J´ai essayé sans slash (en copiant/collant ton code) et avec un seul et deux slash, mais j´obtiens toujours l´erreur fichier introuvable.
P.S.: Les deux slash proviennent du code que j´ai utilisé comme modèle.
 
Re : Macros excel: Erreur fichier introuvable

bonjour tt le monde
verifier si le dococument dede.doc existe dans le DISQUE C si non verifier son emplacement (chemin) est bon
ce genre de probleme m'est deja arrivé
bonne reception
 
Re : Macros excel: Erreur fichier introuvable

autrement essaie avec ce code :
avant de l'excuter verifier si la référence 'necesite d'activer la reference Microsoft Word 12.0 Object Library DANS outil-->référence dans le visual basic

Sub ouvrirfichier()
Dim appWrd As Word.Application
Dim docWord As Word.Document
Set appWrd = createObject("Word.Application")
appWrd.Visible = True
Set docWord = appWrd.Documents. _
Open("C:\dede.doc", readOnly:=True)
End Sub
 
Re : Macros excel: Erreur fichier introuvable

Le fichier dede.doc se situe bien dans le C:.
J´ai meme essayé avec d´autres fichiers placés à d´autres emplacements. Sans succès.

J´ai essayé le code que tu viens de me donner. J´obtiens toujours l´erreur "fichier introuvable".
La reference Microsoft Word 14.0 Object Library est bien activée.
 
Re : Macros excel: Erreur fichier introuvable (résolu)

Eureka! Le fichier s´appelle bien dede.doc et si j´essaye de l´ouvrir depuis une macro excel, ca ne marche pas.
Par contre 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")
Merci bien pour votre aide!
Au fait c´est normal que je ne puisse pas ouvrir un fichier Word .doc, s´il n´est pas sauvé en tant que "document word avec macro"?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
772
S
Réponses
0
Affichages
1 K
Stateaid
S
N
Réponses
3
Affichages
2 K
n.excel
N
N
Réponses
3
Affichages
2 K
E
  • Question Question
Réponses
1
Affichages
3 K
Ericfourm
E
A
  • Question Question
Réponses
0
Affichages
2 K
AUDREYPHIL
A
M
Réponses
4
Affichages
2 K
Retour