Tableau de type Range

Bonjour,
Je suis actuellement en train de coder le jeu snake sous VBA.
Je rencontre une difficulté que je n'ai pas réussi à résoudre malgré le temps passé à chercher une réponse sur les forums.

Pour définir mon serpent, j'aimerais avoir un tableau de type Range, contient donc donc des cellules, les cellules de ce tableau formant le serpent.
Pendant l'initialisation, VB m'indique une erreur ( différentes selon ce que j'ai essayé).

Voici la partie de mon code qui pose problème (je ne sais pas comment introduire un code, faites le moi savoir ) :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Dim serpent() as Range Public Const tete = "+" Public Const queue = "#" ReDim serpent(4) 'longueur de 4 au début For i = 0 To 3 serpent(i) = Range("K" & 19 + i) 'erreur ici : Variable objet ou variable de bloc With non définie If i = 0 Then serpent(i).Value = tete Else serpent(i).Value = queue End If Next i
J'ai également essayé en déclarant mon tableau de la sorte :

Code:

Dim serpent() as Variant

Dans ce cas, l'erreur affiche " objet requis" lors de l'affectation

Code:

serpent(i).Value = tete

Merci de votre aide et de votre attention !

Bonjour Skypred, bonjour le forum,

Puisque tu parles de Range il faut un Set :

Code:

Set serpent(i) = Range("K" & 19 + i)

En effet, cela fonctionne. J'étais sur qu'il s'agissait d'une erreur bête..
Merci de ton aide et bonne soirée !

Re,

Oui Set et Range, heu pardon ! C'est étrange parfois le VBA...