Essaye ce code pour une matrice de 1000 éléments :
Sub SériesDix()
Dim i As Integer, j As Integer, N As Integer
N = 1
For i = 1 To 1000 Step 10
For j = i To i + 9
Cells(j, 1) = N
Next j
N = N + 1
Next i
End Sub
Je ne comprends pas pourquoi tu as ce message d'erreur car dans ma macro, je n'utilise ni la fonction "RETOUR()" ni la fonction "ARRETER()".
Ensuite, ce n'est pas possible de le faire par fonction car sinon on va se confronter à des références circulaires.
Poste le fichier que tu viens de modifier et j’essaierais de le débugger.
A+
Edit : Je ne sens toujours rien d'ici
Ne pas tenir compte de ce message, je ne rafraîchis pas assez vite !!!
Oui j'ai testé (comme toujours avant de posté)
Y-aurait-il un problème ? Tu m'inquiètes Tibo
EDITION: Tu veux dire que j'aurai du marquer dans mon premier post?
=(LIGNE()+11-MOD(LIGNE();11))/11
Ok, d'accord, je vais au coin, et je me mets à genoux sur une règle en fer pendant 11 minutes.
Mais comme j'avais bon pour 20 , j'opte pour 11 secondes
PS: Cela ne dédouane pas pour autant akheir de point saluer tous les intervenants de son fil.
Quoique comme c'est dans l'air du temps sur XLD ces temps-ci , a quoi bon lui en tenir rigueur ...