Macro "propser de parcourir les repertoires"

Bonjour,

je souhaiterais faire une macro qui propose de rechercher un fichier excel en parcourant le(s) disque(s) du micro pour utiliser ensuite ce fichier comme argument dans une autre macro.

Pour commencer et comprendre, si cela est possible, je souhaiterai que cette macro me permette de fouiller le DD puis d'afficher l'adresse et le nom du fichier selectionné.

Merci de votre aide, Alain.

Bonsoir,

Avec "FileDialog". Lance la proc "QuelFichierChoisi" pour voir le résultat :

Function Fichier() As Variant

    With Application.FileDialog(3)

        'affiche la boite de dialogue
        .Show

        'si annuler
        On Error Resume Next

        'récupère le chemin du fichier choisi (le 1er)
        Fichier = .SelectedItems(1)

        'si une erreur (pas de fichier choisi) retourne False
        If Err.Number <> 0 Then Fichier = False

    End With

End Function

Sub QuelFichierChoisi()

    MsgBox Fichier

End Sub

Hervé.

Super.

Merci beaucoup, je ré-ouvrirai peut être le fil quand j'aurai fini ma macro d'essai si j'ai des problèmes.

Bonne soirée.