Chemin Relatif - Aide Urgente SVP

Signaler
Messages postés
36
Date d'inscription
jeudi 9 juin 2005
Statut
Membre
Dernière intervention
16 mai 2006
-
Messages postés
36
Date d'inscription
jeudi 9 juin 2005
Statut
Membre
Dernière intervention
16 mai 2006
-
Bonjour,

J'ai simplement un gros problème de chemin relatif en VBA. Je pense que je n'ai pas bien compris le principe de fonctionnement...
J'ai un fichier extraction.csv dans le même dossier que mon .mdb dans lequel j'ai le code suivant :

Set ClasseurXLS = CreateObject("Excel.application")

ClasseurXLS.Workbooks.Open "./extraction.csv"

PROBLEME : Il ne veut pas entendre parler de chemin relatif ou du moins ne le comprend pas ! Erreur : Erreur d'exécution '1004' : './extraction.csv' est introuvable.
Bien sur si je mets 'extraction.csv', ça ne marche pas non plus !!!
En revanche avec le chemin absolu (c:\.../.../extraction.csv) ça marche... ????

Pouvez-vous m'aider SVP, ça ne me semble pas sorcier et c'est pour un besoin imminent.

Merci beaucoup pour votre aide

A.

7 réponses

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
et en mettant un backslash \ plutot qu'un slash ....

c'est pas mieux ?

Amusez-vous !
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS - MVP Visual Basic
Messages postés
36
Date d'inscription
jeudi 9 juin 2005
Statut
Membre
Dernière intervention
16 mai 2006

nan...
Messages postés
22
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
16 juin 2005
3
Avec Access >= 2000 tu peux faire:

Dim Chemin as string
Chemin = CurrentProject.Path & "\extraction.csv"
Set ClasseurXLS = CreateObject("Excel.application")
ClasseurXLS.Workbooks.Open Chemin

Avec Access97 c'est + compliqué car CurrentProject n'esiste pas, il faut indiquer qqpart dans une table ou dans une boite de dialogue le répertoire d'installation de ta base.
Messages postés
36
Date d'inscription
jeudi 9 juin 2005
Statut
Membre
Dernière intervention
16 mai 2006

d'accord et si maintenant je veux ouvrir monfichier.csv depuis du code VBA présent dans mabase.mdb selon l'architecture suivante :

RACINE
|_ Dossier 1
| |_ monfichier.csv
|
|_ Dossier 2
|_ mabase.mdb

... je fais comment ????
Messages postés
36
Date d'inscription
jeudi 9 juin 2005
Statut
Membre
Dernière intervention
16 mai 2006

Architecture propre :

RACINE
|_ Dossier 1
| |_ monfichier.csv
|
|_ Dossier 2
|_ mabase.mdb
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
62
tout dépend de ce qu'est RACINE ...

l'atuce reste la même

Chemin = CurrentProject.Path & "\Dossier 1\monfichier.csv"

Amusez-vous !
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS - MVP Visual Basic
Messages postés
36
Date d'inscription
jeudi 9 juin 2005
Statut
Membre
Dernière intervention
16 mai 2006

Ok pour ta solution mais elle donne un chemin incorrect car tu ne remontes pas jusque dans RACINE que l'on va appeler Dossier Pere par exemple...
L'idée c'est que si toute fois Dossier Pere est déplacé, qu'il n'y ait pas à changer tous les chemins dans le cas où ceux-ci seraient en absolu...
Ta solution donne :
....../Dossier 2/Dossier 1/monfichier.csv
ce qui n'existe pas puisque tu ne remontes pas d'un cran (i.e. tu ne sors pas de Dossier 2) Comment remonter dans le Dossier Pere ?
That's the question...