Récupérer le nom de cellules

Dans un classeur, j'ai en colonne A des cellules qui toutes sont nommées. Je voudrais que dans la colonne B apparaisse le nom des cellules correspondantes de la colonne A.

Function NOM(Cellule As Range) As String
 NOM = Cellule.Name.Name
 End Function

Et ensuite : =NOM(A1) Si tu renommes des cellules après coup, il faut faire un Ctrl-Alt-F9 pour mettre à jour les noms renvoyés par cette fonction.

Auteur :

Mots clefs associés à cette page : ,