Description #
Cette fonction permet d’obtenir l’ensemble des cellules pour lesquelles un nom de champ a été attribué au niveau d’un fichier.
Par exemple si j’ai attribué le nom « P_AF » à la cellule « A4 », la fonction va le prendre en considération.
Code #
Sub ListRangeNames()
dim ws as worksheets
Set ws = Worksheets.Add
i = 1
For Each nm In ActiveWorkbook.Names
ws.Cells(i, 1).Value = nm.Name
ws.Cells(i, 2).Value = « ‘ » & nm.RefersTo
i = i + 1
Next
End Sub
Commentaires #
Si vous utilisez Excel pour PC, vous pouvez améliorer cette fonction en limitant la recherche à une feuille de calcul ou en filtrant les résultats pour des onglets spécifiques.
Attribution d’un nom à un ensemble de cellules : #
Pour rappel dans Excel pour PC, il est possible d’attribuer un nom à des cellules au niveau pour une feuille spécifique ou de manière générale au niveau du fichier (option par défaut).
Pour plus de précision concernant l’attribution de noms à des cellules, se reporter au menu :
- Office pour Mac : « Formules/Définir un nom »
- Office pour PC : « Formules/Noms définis »