Trouver une cellule nommée

[Phil_PF]

Bonjour,

J'ai une feuille qui contient des cellules nommées (P1, P2, ...).

Je fais une copie de certaines cellules contenant ces noms dans des formules, et il me faut changer certains de ces noms. Par VBA c'est facile, mais ce que je ne sais pas faire c'est de savoir si les nouveaux noms existent déjà ou pas dans la feuille...

Donc ma question est : comment vérifier l'existence d'un nom pour une certaine cellule ?

Merci d'avance

 

[chris]

Re : Trouver une cellule nommée

Bonjour

Faire un boucle

For each nom in ActiveWorkbook.names

 

[Phil_PF]

Re : Trouver une cellule nommée

Oui, mais j'ai mal pose la question, je veux savoir si le nom existe, et pas où il se trouve

 

[chris]

Re : Trouver une cellule nommée

Re

le code sert juste à initialiser une boucle et ne sert pas à donner d'emplacement.
Dans la boucle, tu vérifies, pour chacun des noms trouvés, s'il est égal à celui dont tu recherches l'existence.

 

[Phil_PF]

Re : Trouver une cellule nommée

Merci,mais je pensais (à tort) qu'il y avait plus simple.

Bonne journée

 

[JCGL]

Re : Trouver une cellule nommée

Bonjour à tous,

Si tu souhaites simplement avoir un aperçu des Noms Définis : un appui sur la touche F5

Bises à Chris 🙂
A+ à tous

 

[Phil_PF]

Re : Trouver une cellule nommée

J'a trouvé :

Private Sub TrouveNom()
TousLesNom = ""
For Each nom In ActiveWorkbook.Names
nom1 = TousLesNom & " - " & nom.name
Next
MsgBox (TousLesNom)
End Sub

Donne les noms et pas les références