OVH Cloud OVH Cloud

Ouvrir un répertoire

1 réponse
Avatar
Quiche
Bonjour à toutes et tous,

J'ai une question simple (vba) :
D'une part, un formulaire liste des clients (n°client, nom) ,
d'autre part des répertoires nommés avec un n°.
Expl : le répertoire 211 contient tous les fichiers du client 211.

je cherche, en cliquant sur un bouton par exemple, à ouvrir le dossier
du client. clic sur client 211 ouvre le dossier D:\211\
sans passer par par la boite de dialogue "Fichier/Ouvrir"

Merci par avance et bon appétit
Christophe

1 réponse

Avatar
Raymond [mvp]
Bonjour.

si tu veux ouvrir un dossier c'est pour sélectionner quelque chose ? et si
tu ne veux pas ouvrir la boite de dialogue comment faut-il faire ?
si c'est pour ouvrir la boite de dialogue et te positionner directement sur
le répertoire D:211, tu utilises l'api openfile avec le nom du répertoire
par défaut:
prendre l'api sur la page :
http://access.seneque.free.fr/ouverture_document.htm
appeler la fonction par :
Me.Texte1 = Replace(OpenFile("D:" & Me.numeroclient ), vbNullChar, ";")
au lieu de la fonction standard qui est:
Me.Texte1 = Replace(OpenFile(CurrentProject.Path), vbNullChar, ";")
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Quiche" a écrit dans le message de
news:c1i1bj$b3u$
Bonjour à toutes et tous,

J'ai une question simple (vba) :
D'une part, un formulaire liste des clients (n°client, nom) ,
d'autre part des répertoires nommés avec un n°.
Expl : le répertoire 211 contient tous les fichiers du client 211.

je cherche, en cliquant sur un bouton par exemple, à ouvrir le dossier
du client. clic sur client 211 ouvre le dossier D:211
sans passer par par la boite de dialogue "Fichier/Ouvrir"

Merci par avance et bon appétit
Christophe