darems
Messages postés5Date d'inscriptionmercredi 2 avril 2003StatutMembreDernière intervention10 septembre 2013
-
2 avril 2003 à 13:06
pelw
Messages postés148Date d'inscriptiondimanche 12 janvier 2003StatutMembreDernière intervention14 février 2005
-
2 avril 2003 à 21:51
Bonjour,
Voila, je suis sur une appli Access qui importe plusieurs fichiers Excel afin de peupler les tables.
Pour l'instant, l'utilisateur doit entrer le chemin du fichier à importer dans un textbox.
Or, j'aimerais plutôt récupérer ce chemin en affichant une fenêtre de navigation (du genre "enregistrer sous") dans laquelle l'utilisateur pourrait parcourir son arborescence et cliquer sur le fichier à télécharger (ce qui serait quand même plus naturel!).
Quelqu'un pourrait-il m'aider dans ce but?
Merci d'avance
pelw
Messages postés148Date d'inscriptiondimanche 12 janvier 2003StatutMembreDernière intervention14 février 20056 2 avril 2003 à 21:51
Essaye ceci (dans un module Access) :
Sub CommonDialogOpen()
On Error GoTo CommonDialogOpen_Error
Dim oCDLG As Object
Set oCDLG = CreateObject("MSComDlg.CommonDialog")
With oCDLG
'Intercepter Cancel
.CancelError = True
'Répertoire de départ
.InitDir = "C:"
'Afficher la boîte de dialogue
.ShowOpen
'Afficher le fichier sélectionné
MsgBox "Fichier sélectionné : " & .FileName
End With