Renommer une cellule excel

Bonjour a vous tous,

Petite question... deux en fait. :oops:

Je renomme des cellules excel dans une macro. J'aimerais par la suite redonner un nom différent ces même cellules... savez vous comment on peut faire.

- Est ce que je dois modifier le nom, supprimer le nom et le récréer... par ce que j'ai l'impression que la même cellule peut faire référence a plusieurs nom...


Le deuxième soucis est lié. Je nomme mes cellules dans une boucle. Seulement c'est uniquement la dernière cellule qui passe dans la boucle qui garde le nom... J'aimerais qu'elles portent toutes le même.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

For Each Cellule In Selection   Cellule.Activate Dim Ligne...   Dim NumColone...   Prenom = ActiveSheet.Cells(15, Numcolonne).Value   Coordonnee = ActiveWindow.ActiveCell.Address 'Recupere la derniere ligne vide de la feuille 2 Ligne = Sheets("Feuil2").Range("b65536").End(xlUp).Row + 1 With Sheets("Feuil1")     'JE RENOMME MA CELLULE   ActiveWorkbook.Names.Add Name:="N" & CStr(Numero) , RefersToR1C1:="=Feuil1!R" & Ligne_cellule & "C" & Numcolonne     End With Next

---

Merci de votre aide... :D
Bonne journée

Bonjour !
Tu ne peux pas donner le même nom à plusieurs cellules, sinon, comment veux-tu qu'on s'y retrouve. Par contre, tu peux nommer une zone complète (Range) constituée de toutes les cellules que tu veux.
Commence donc par créer ta Range en associant tes cellules, puis nomme la.

Merci Megaxel

OK je vais modifier pour avoir un range...
Mais est t'il possible de modifier le nom d'une cellule déja existante? Si oui on fait comment?

Hello,

Oui, tu peux la renommer à condition de supprimer le nom existant sur la cellule auparavant

Code:

---

1 2 3 4

ActiveWorkbook.Names("MonNomCellule").Delete Range("F10").Select ActiveWorkbook.Names.Add Name:="MonAutreNomDeCellule", RefersToR1C1:= _ "=Feuil1!R10C6"

---

A+

ouskel'n'or tu viens de faire ma soirée la....
Merci BCP