VBA Récupérer le nom du fichier

Résolu
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.

1 réponse

  1. Modérateur
    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
    1. 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
    2. Merci BG des plages !!!
      1