Gérer le nom d'une feuille de calcul Excel côté VBA

Cette méthode permet de s'affranchir du nom de l'onglet côté Excel qui peut ainsi être modifié à loisir par l’utilisateur final.

1) Renommer dans le panneau des propriétés la feuille de calcul, par exemple : FInfos

2) Placer le code suivant dans un module :

Public Function NomFeuille(Classeur As Workbook, NomVba As String) As String
    NomFeuille = Classeur.VBProject.VBComponents(NomVba).Properties("Name").Value
End Function

3) Puis faire appel à cette fonction dans une procédure quelconque :

Dim wb as Workbook
Dim ws as Worksheet
Dim NomReel as String

Set wb = ThisWorkbook
NomReel = NomFeuille(wb, "FInfos") 'Le 2e paramètre correspond au nom donné à l'étape 1
Set ws = wb.Sheets(NomReel)