Bonjour,

Je cherche a faire un truc assez simple mais qui marche pas. Je veux qu'a chaque fois que l'instruction i="a" est rencontree on aille au label "err" or ce qui se passe c'est que la premiere fois que cette instruction est rencontree on va bien a err mais au second passage j obtiens une erreur. Pourant je continue a faire du error handling puisque j ai pas fait on error goto 0. J ai un fusil a une balle et je veux une kalash avec un nombre de balles infinie...


Merci !

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Dim i As Integer
err:
 
    For i = 0 To 0
 
    Next i
 
    On Error GoTo err
 
    i = "a"