VBA Récupérer le nom du fichier

Résolu
pampiou Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   -  
 gogodu75 -
Bonjour aux experts de la programmation!

Je fais actuellement une programme sous Visual Basic avec Excel. Je voudrais récupérer le nom du fichier automatiquement et l'enregistrer dans une variable afin d'éviter de changer toutes les lignes de code où on fait appel au nom du fichier.
Pour le moment, j'ai fait ceci :
Dim nom As String
nom = Workbooks.Application.Name

Mais le problème est que la variable "nom" me retourne "Microsoft Excel".

Si l'un de vous a une solution pour récupérer le nom du fichier (sans le chemin d'accès), je suis preneur!!!

Merci d'avance pour votre aide.
A voir également:

1 réponse

Réponse 1 / 1
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Bonjour,
Si tu n'as pas besoin de l'extension du fichier : 
Dim NomFic As String
NomFic = ThisWorkbook.Name
MsgBox NomFic
Si tu as besoin de l'extension : 
Dim NomFic As String
NomFic = ThisWorkbook.Name & ".xls" 'ou ".xlsm" etc...
MsgBox NomFic
12
pampiou Messages postés 20 Date d'inscription   Statut Membre Dernière intervention   2
 
Merci beaucoup!!!
Il n'y avait pas grand chose à trouver, mais après une bonne heure de recherche sans trouver, tu m'as souvé :p
1
gogodu75
 
Merci BG des plages !!!
1

Discussions similaires

Excel, effacer une partie de texte.
owiowi -
Mytå -

7 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
code renvoi à la ligne sous VBA Excel
lecrol -
arianinou -

21 réponses
VBA Selection jusqu'a derniere cellule pleine
teamktm1307 -
Tobar4 -

4 réponses
VBA convertir texte en nombre
fapfapfap -
sagessedz -

20 réponses
Erreur d'execution 424 : Objet requis
ThePlisskenism -
pijaku -

12 réponses