[VBA] nom de cellule

Bonjour

Pour attribuer un nom de cellule sous VBA, j'ai fait un enregistrement automatique de macro qui donne ça :

Code:

---

1 2 3

Range("B2").Select ActiveWorkbook.Names.Add Name:="nom", RefersToR1C1:="=Feuil1!R2C2"

---

Bizarrement, quand je lance la macro avec un autre name=, le changement de nom ne se fait pas, ma cellule garde son nom initial "nom" ??

Ensuite, quand je veux faire apparaitre par une msgbox le nom de la cellule

Code:

---

MsgBox ActiveCell.Name

---

la msgbox m'affiche l'adresse (Feuil1!R2C2) et non le nom ?

Bref je suis perdu:?

juste une petite précaution : es tu bien sur que

Code:

---

Range("B2").Select

---

séléctionne dans le bon classeur (sous peu que tu ai 2 classeurs ouvert)

Contrôle ca avec !

Code:

---

ActiveWorkbook.Range("B2").Select

---

Voir

Code:

---

1 2	ThisWorkbook.Range("B2").Select ThisWorkbook.Names.Add Name:="nom", RefersToR1C1:="=Feuil1!R2C2"

---

si la macro travaille sur le même classeur que le sien. C'est toujours un peu plus sûr...:roll:

Merci pour ces conseils.

Néanmoins pour le test je n'ai qu'un classeur d'ouvert (à une feuille !).

Donc c'est pas à ce niveau que ça plante .

Pourquoi se prendre la tête :

Code:

---

ThisWorkbook.Sheets("Feuil1").Cells(2, 2).Name = "MonNom"

---

ou :

Code:

---

ThisWorkbook.Sheets("Feuil1").Range("B2").Name = "MonNom"

---

je pense que tu devrais te référer à l'aide de Excel avant tout. Les exemples te montreront bien l'utilisation d'un classeur...;)

L'enregistreur de macro te servira surtout à trouver une fonction, mais ne suis pas trop leurs procédures, c'est de temps en temps trop précis pour être réutilisé.

En l'occurence, tu ne prenait pas en compte le passage d'une feuille à l'autre, alors que l'enregistreur oui... donc c'est le bazar!:mouarf:

L'aide sur Name j'ai déja regardé mais il n'y a rien ou presque.

Ton dernier code, ça ne plante pas mais comme avant ça ne fait pas non plus changer le nom.

Bon ce n'est pas non plus primordial pour moi, je pense que je vais passer à autre chose....

Merci pour l'aide ;)