Retour en arrière dans le code
j
Bonjour,
Je viens à vous avec une question qui est peut-être bête mais je n'ai pas réussi à résoudre le problème seul.
Je possède un code avec une msgbox question, et suivant la réponse à la question, j'aimerais faire un retour en rrière dans le code. Existe-il une fonction simple qui le fasse?
If x=0 Then
RETOUR ICI
Bout de code
Else
Dim Rep As Integer
Rep = MsgBox("Voulez-vous continuer et utiliser le bout de code ?", vbYesNo + vbQuestion, "Question")
If Rep = vbYes Then
Retour juste avant bout de code
End If
End IfAvez-vous une idée de comment faire?
En vous remerciant par avance.
Jérémy
F
Bonjour
Mets un numéro devant la ligne sur laquelle tu veux revenir (10 par ex)
then goto 10
Cordialement
FINDRH
Bonjour,
essaye ceci :
Dim Rep As Integer
If x = 0 Then
debut:
'Bout de code
Else
Rep = MsgBox("Voulez-vous continuer et utiliser le bout de code ?", vbYesNo + vbQuestion, "Question")
If Rep = vbYes Then GoTo debut
End Ifbon après midi
@+
bonjour,
exemple de solution avec une boucle do... loop while
Dim Rep As Integer
If x = 0 Then
Do
'bout de code
Rep = MsgBox("Voulez-vous continuer et utiliser le bout de code ?", vbYesNo + vbQuestion, "Question")
Loop While Rep = vbYes
Else
End If