Récupérer nom de fichier

chuinul

XLDnaute Occasionnel
Bonjour a tous,

J'ai une macro qui par mesure de sécurité appel certaines fonctions de la façon suivante :

Workbooks("MON_FICHIER.xls").Worksheets("Start").Range("A1").Delete

Le problème c'est que plusieurs personnes pourraient utiliser cette macro, et pourraient renommer le fichier, MON_FICHIER.xls deviedrait MON_FICHIER_bis.xls .... mais le problème c'est que la macro ne fonctionnerait plus.

Je ne peux enmécher les utilisateurs de changer le nom du fichier, et je préfère éviter de faire : Worksheets("Start").Range("A1").Delete

En effet, je préfère maitriser où la macro s'éxécute.

Je souhaiterai donc récupérer e nom complet du fichier excel dans lequel se trouve la macro, et la faire passer en variable.

Ma question est la suivante : Comment puis-je récupérer le nom du fichier?

Merci beaucoup,

Y.
 

Discussions similaires

Réponses
6
Affichages
178

Statistiques des forums

Discussions
312 752
Messages
2 091 661
Membres
105 037
dernier inscrit
Zazou75