Description #
Ce code permet d’ouvrir une fenêtre dans laquelle vous demandez à l’utilisateur de choisir un ou plusieurs fichiers. Si vous ne mettez aucune restriction, tous les fichiers seront accessibles et cela quelle que soit le format…
Il est fortement recommande de limiter le choix de l’utilisateur pour éviter les risques d’erreur dans l’exécution de la macro.
Code #
MyPath = Application.GetOpenFilename(FileFilter:= »Excel Files,*.xls* », MultiSelect:=False)
Workbooks.Open Filename:=MyPath, UpdateLinks:=False
Commentaires #
Ces instructions peuvent être incluses dans une procédure ou une fonction.
Vous pouvez également limiter le choix à 1 seul fichier grâce à l’option « MultiSelect:= ». Si vous répondez par « False », cela signifie que le choix porte sur 1 fichier. Si vous répondez par « True », alors plusieurs fichiers peuvent être choisis simultanément. Donc être attentif à cette option pour ne pas compromettre le fonctionnement de la macro.
L’option « FileFilter » permet de préciser le type de fichier qui sera accepté. Ici dans ce cas il s’agit des formats « xls », donc tout autre format sera refusé. Soyez attentif à cette information.
