Parametrer le chemin d'acces d'un fichier en VBA Access

Bonjour,

Je souhaite pouvoir donner la possibilité à un utilisateur de parametrer le chemin d'acces (dans Access) vers un fichier xls par exemple.

Aujourd'hui dans ma macro Access, j'écris dans le code directement le chemin d'accès (ex: D:\Applications\tott.xls), mais j'aimerais pouvoir écrire ce chemin dans une table Access et dans ma mcro venir cherche le chemin qui est renseigné dans cette table.

Tout ceci pour permettre à l'utilisateur final de venir simplement mettre à jour le chemin dans une table , sans aller dans le code.

Je ne connais pas la commande ou la synthaxe pour venir chercher le champ dans une table???,:(:(:(:(

Merci d'avance pour l'aide que vous pourrez m'apporter

salut,
regarde si ce tutoriel ne repond pas a toutes ces questions
http://jpcheck.developpez.com/tutori...es-initiation/

hello
aujourd'hui j'utilise un simple dlookup vers la table paramètre
au début, je n'avais qu'une ligne dans cette table et j'ajoutais des colonnes à chaque nouveau paramètre ce qui fait que le dlookup était simple

Code:

---

dlookup("no_du_param","table_paramètres")

---

Simplissime!!!
comme j'en avais marre de passer la table en mode création pour rajouter des paramètres, j'ai changé le forme de la table paramètres: nom_du_param, valeur_num, valeur_texte, commentaire
et dans ce cas le dlookp devient

Code:

---

1 2 3 4

' pour un paramètre de type numérique dlookup("valeur_num","table_paramètres","nom_du_param = celui_que_je_cherche") ' pour un paramètre de type texte dlookup("valeur_texte","table_paramètres","nom_du_param = celui_que_je_cherche")

---

un peu moins simplissime mais plus efficace dans le temps

Bonjour

Il te suffit simplement sur le click d'un bouton d'ouvrir une boite de dialogue et de récupérer le chemin du fichier sélectionné. De donner peut-etre un chemin de base pour l'ouverture de la boite de dialogue pour faciliter l'accès au fichier xls (par exemple ici pour toi : D:\Applications\)


edit:
Voici le code que j'ai utilisé sur le click d'un bouton pour pouvoir récupérer le chemin d"un fichier :

Code:

---

Me.CHEMIN = OuvrirUnFichier(Me.hWnd, "Texte à afficher en haut de la fenètre de dialogue", 1, , , "CHEMIN DEFAUT")

---

CHEMIN étant le nom d'une cellule texte dans mon formulaire pour afficher le chemin du fichier sélectionné
CHEMIN DEFAUT étant le chemin par défaut permettant d'ouvrir la boite de dialogue à un endroit voulu. Si vous ne voulez pas de chemin par défaut le code sera :

Code:

---

Me.CHEMIN = OuvrirUnFichier(Me.hWnd, "Texte à afficher en haut de la fenètre de dialogue", 1)

---

Moi j'ai mis le champs CHEMIN en visible non.
Et j'ai dis en VBA que si le Champ CHEMIN est Null ou vide d'ouvrir la boite de dialogue sinon d'ouvrir le fichier avec le chemin contenu dans le Champ CHEMIN.