Discussion :

[CristofMartins]

Bonjour,
quelqu'un connait une méthode pour recommencer une boucle alors qu'on est en pleins milieu d'elle ?
J'ai envisagé à créer une boolean que je met à true lorsque je fais un exit for au milieu de la boucle et en dehors avoir un Do Loop que tant que ma boolean n'est pas à false il refait la boucle mais il y a-t-il une façon de faire ?

Merci d'avance.

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub test()
Dim i As Long
Reprise:
For i = 0 To 100
    If i = 50 Then GoTo Reprise
Next
End Sub

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub test()
Dim i As Long
 
For i = 0 To 100
    If i = 50 Then i=0
Next
End Sub

[CristofMartins]

Salut,
Merci pour tes deux solutions la première me convient à 100%.
La deuxième ne serait pas possible que je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
foreach cell in listobject.listrow..

et je n'ai jamais trouvé comment donner une valeur cell.row. Il me semble qu'on ne peut pas.
Mais bon merci beaucoup pour tes solutions.
Salutations