Spécification et ouverture d'un fichier Excel par macro

Résolu/Fermé
Tom 44 Messages postés 47 Date d'inscription mardi 30 juillet 2013 Statut Membre Dernière intervention 11 mars 2014 - 8 oct. 2013 à 18:27
Tom 44 Messages postés 47 Date d'inscription mardi 30 juillet 2013 Statut Membre Dernière intervention 11 mars 2014 - 9 oct. 2013 à 16:21
Bonjour,

Ne maîtrisant pas vraiment le codage VBA, je me permets une nouvelle fois à faire appel à vos services.

J'essaye de mettre au point une macro qui me permettrai de demander (par msgbox) à l'utilisateur d'un classeur excel d'aller chercher sur un répertoire X un fichier Y (X et Y ayant des noms aléatoires)

Voici ce que j'ai tenté mais je me retrouve avec un soucis lors de la spécification de l'emplacement du fichier cible : en effet je ne peux spécifier que le dossier contenant ce fichier.
Ce qui m'intéresserai serait plutôt d'aller chercher directement le fichier cible.

Sub Acces

Dim Repertoire As FileDialog

Set Repertoire = Application.FileDialog(msoFileDialogFolderPicker)

If Repertoire.Show Then

Range("U26") = Repertoire.SelectedItems(1)

Else
Exit Sub
End If

End Sub

Auriez vous une idée de correction ?

Merci par avance.
A voir également:

21 réponses

Tom 44 Messages postés 47 Date d'inscription mardi 30 juillet 2013 Statut Membre Dernière intervention 11 mars 2014
9 oct. 2013 à 16:21
Merci beaucoup cela fonctionne sans aucun problème.

Et merci pour votre patience et efficacité.

Cdt,
0