+41(0)79 606 2770 info@agica.ch
View Categories

Obtenir la liste de tous les champs nommés


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 »