Gestion des nom par macro

Bonjour,
Pour mettre à jour un graphique de façon dynamique j'essai de donnée un nom à une plage de donnée et ce graphique fait référence à ce nom.
Pour créer un nom de façon dynamique je passe par la macro VBA.
Donc j'enregistre une macro en faisant les étapes puis quand j'ouvre la macro la ligne ressemble à :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

With ActiveWorkbook.Names("nom") .Name = "nom" .RefersToR1C1 = "=Feuil1!R1C1:R38C2" .Comment = "" End With La remplace la ligne par : With ActiveWorkbook.Names("nom") .Name = "nom" .RefersToR1C1 = "=Feuil1!R" & Var1 & "C1:R" & Var2 & "C2" .Comment = "" End With La référence du nom change mais pas correctement au lieu d'afficher =Feuil1!R1C1:R64C2 il affiche =Feuil1!'R1C1':'R64C2'

---

Je ne sais pas du tout comment on peut enlever ces apostrophe donc si vous pouvez m'aider.
Je vous remercie d'avance.

Bonsoir thedragon25,

Essaies :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub nom_plage()   'définit une plage de cellule par un nom 'puis modifie cette plage grâce à deux variables   Dim Var1, Var2 As Long Var1 = 1 Var2 = 64   ActiveWorkbook.Names.Add Name:="nom", RefersToR1C1:="=Feuil1!R1C1:R38C2" ActiveWorkbook.Names("nom").RefersToR1C1 = "=Feuil1!R" & Var1 & "C1:R" & Var2 & "C2"   End Sub

---

ça fonctionne chez moi ;)

Bertrand

Merci,
Je ne vois pas pourquoi ça ne marchais pas hier mais le fait de tout écrire sur une seul ligne ou alors de définir les variables en "Long" fait fonctionner mon programme merci beaucoup.

Citation:

---

Envoyé par Bear the french

Code:

---

1 2 3 4 5 6

Sub nom_plage()   'définit une plage de cellule par un nom 'puis modifie cette plage grâce à deux variables   Dim Var1, Var2 As Long

---

---

Bonjour,

Pour info, pour une déclaration correcte des variables, chaque variable doit être typée

Code:

---

Dim Var1 As Long, Var2 As Long

---