Bonsoir,
le but n'étant pas de jouer mais de créer et de trouver des solutions à des problèmes, je dirait déjà une chose :
Dim Coul_Serp as long
Coul_Serp = Sheets(3).Cells(4, 2).Interior.Color
est plus rapide en VBA que Sheets(3).Cells(4, 2).Interior.Color à tout bout de champ
Il est plus difficile à VBA d'aller chercher une valeur sur une feuille que de la stocker une fois dans une variable et d'utiliser cette variable par la suite, en plus le code pourrait gagner en clarté car CS pour couleur serpent est court et claire que Sheets(3).Cells(4, 2).Interior.Color, non ?
Je continue de regarder
@ bientôt
LouReeD
PS : il se peut que je regarde aussi l'autre Snake en contrôle label sur Userform !!!
Re
'Copie des adresses dans un tableau tampon
For i = 1 To longueur
Sheets(2).Cells(3, i) = Sheets(2).Cells(1, i) 'lignes
Sheets(2).Cells(4, i) = Sheets(2).Cells(2, i) 'colonnes
Next i
Ce tableau tampon, pourquoi ne pas le faire avec un tableau VBA Dim tableau()
après je n'ai pas la vision de votre esprits pour la création de ce tableau mais sous VBA il sera plus rapide que sous "transfert données entre feuille et VBA"
@ bientôt
LouReeD