OUVRIR Application.GetOpenFilename sur l'emplacement du classeur actif

Bonjour chers tous

Je voudrais depuis mon fichier actif sélectionner des fichiers à renseigner sur mon ordinateur.

Les fichiers sont dans le même emplacement que mon classeur actif .

Je voudrais adapter l'instruction suivante pour aller directement sur le dossier parent et sélectionner le fichier au choix

Merci

Dim fichier As Variant

fichier = Application.GetOpenFilename(Title:="Selectionnez le template de la clinique renseigné", filefilter:="Fichier Excel (*.xls*),*xlsx*", buttontext:="Cliquez")

bonjour,

essaie ceci (testé sur PC)

ChDir ActiveWorkbook.Path
fichier = Application.GetOpenFilename(...tes paramètres

Juste et bon.

Merci!!!

Rechercher des sujets similaires à "ouvrir application getopenfilename emplacement classeur actif"