[Excel VBA] Récupérer liste nom cellule

grotone Messages postés 14 Date d'inscription   Statut Membre -  
 Max -
Bonjour,

Voila, j'ai pleins de feuilles dans Excel avec bon nombre de cellules ou plage de cellules que j'ai renommé à ma guise.

Je me demandais si il était possible en VBA de récupérer la liste de tout les noms de cellules renommées sur une page donnée.

Merci d'avance

Grotone
Configuration: Windows 2003
Internet Explorer 6.0

1 réponse

  1. Max
     
    Bonjour,

    voici un petit programme qui pourra peut être t'aider

    Sub recup_noms()

    i = 1

    For Each n In ActiveWorkbook.Names

    Sheets("feuille1").Range("A" & i) = n.Name

    i = i + 1

    Next n

    End Sub

    les noms sont copiés dans feuille1 colonne A

    Max
    0