Open path introuvable

Messages postés
38
Date d'inscription
vendredi 23 décembre 2005
Dernière intervention
27 mars 2018
- - Dernière réponse : Whismeril
Messages postés
12366
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
10 décembre 2018
- 5 mars 2018 à 20:49
Bonjour,
Avec VB6, j’ai un problème pour ouvrir Excel.

Set XLApp = New Excel.Application
Set XLBook = XLApp.Workbooks.Open(Path & " Excel.xlsm")
Le fichier Excel.xlsm est bien dans le même dossier que MonVB6..vbp
Mais j’ai l’erreur qu’il est introuvable.

Quand je définie l’endroit comme ceci :
Set XLBook = XLApp.Workbooks.Open("C:\ \Dossier\Excel.xlsm")
Ça fonctionne.

Je l’ai déjà fait et ça fonctionnait. Pourquoi ça ne fonctionne plus?

A l’aide SVP
Merci

Jean-Claude


--
Afficher la suite 

Votre réponse

3 réponses

Messages postés
12366
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
10 décembre 2018
0
Merci
Bonjour

déjà si tu as copié coller le code
Set XLBook = XLApp.Workbooks.Open(Path & " Excel.xlsm") 
il y a un espace devant Excel.xlsm qui ne devrait pas y être.
Mais si tu as tapé le code, c'est peut-être une erreur de frappe dans le message, dans ce cas si tu avait utilisé la coloration syntaxique et prévisualisé le message, tu l'aurais peut-être vu et corrigé.

D'autre part, est ce que Path finit par \, par ce que si ça n'est pas le cas alors ta construction est
"C:\DossierExcel.xlsm"
qui n'est forcément pas bon.

Mets un point d'arrêt, pour vérifier le contenu de Path
Commenter la réponse de Whismeril
Messages postés
38
Date d'inscription
vendredi 23 décembre 2005
Dernière intervention
27 mars 2018
0
Merci
Bonjour,
Merci pour votre aide.
C’est une erreur de frappe dans le message,
J’ai essayé avec \ sans succès: Set XLBook = XLApp.Workbooks.Open(Path & " \Excel.xlsm")

J’ai mis un point d’arrêt juste avant : Set XLBook = XLApp.Workbooks.Open(Path & "Excel.xlsm")
Je mets mon curseur sur Path et je vois que Path = Empty
Pourtant xxx.vbp et xxx.xlsm sont dans le même dossier.
Je crois bien que c’est là mon problème mais pourquoi?
Encore une fois MERCI!

Jean-Claude


--
Commenter la réponse de jctgt
Messages postés
12366
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
10 décembre 2018
0
Merci
Ça fait plus de 10 ans que je n'ai pas codé en VB6, mais de mémoire Path n'est pas un objet de VB6, app.Path et CurDir oui.
Commenter la réponse de Whismeril

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.