Bonjour tout le monde
je ne parviens pas a régler une boucle do loop que je voudrais récursive
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
Sub jeu()
tirages234 (2)
End Sub
 
Sub tirages234(colonne As Integer)
MsgBox "execution" & colonne
Do until colonne = 4
colonne = colonne + 1
tirages234 (colonne)
 
Loop
End Sub
je souhaiterais simplement la premiere instance execution 2 puis 3 et 4 et sortir
or je n'y parviens pas il se produit toujour une rééxecution du 4 ou si j'essaye while<5 until colonne = 3 ou meme si j'utilise
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
do
...
if colonne=4 exit do
loop
j'ai du rater un épisode sur les boucles
si qqun peut m'aider, merci d'avance