nom de cellule

Bonjour,
je voudrais donner un nom à une cellule en fonction du nombre de feuille. Mais je ne sais pas pourquoi quand je fait l'affectation il me met 'erreur 1004 : le teste que vous avez tapé n'est ni une référence ni un nom défini valide'
Voici mon code :

Code:

---

1 2 3 4 5

Var = Worksheets.Count Range("A500").Select num = "fin" & Var MsgBox (num) Application.Goto Reference:= num

---

Mon erreur se trouve à la dernière ligne.
merci d'avance

Essaye comme comme ça
;)

Code:

---

ActiveWorkbook.Names.Add Name:="NUM"

---

il y a toujours une erreur sur la même ligne mais ce n'est pas la même :
erreur définie par l'application ou par l'objet

bonsoir

Tu peux tester

Code:

---

1 2 3 4 5 6 7 8 9

Dim Var As Integer Dim Cible As String   Var = Worksheets.Count Cible = "NomCell" & Var   'Nomme la cellule A1 de la Feuil1 ActiveWorkbook.Names.Add Name:=Cible, RefersTo:="=Feuil1!$A$1" Range(Cible).Select

---

michel