Next without ForRésolu

Question

bonjour a toute la communaute VBFRANCE

SVP j'ai un probleme avec la boucle for

_________________________________________________________________
Label1:

For N = 0 To UBound(G)

existence = False'If tabarc(Np, N) True Then
   
      If G(N) = Sar Then
      
      GoTo label2:
      
      Else
      
      ReDim Preserve Q(UBound(Q) + 1)
      Q(UBound(Q)) = G(N)
      Delete G, N
      Np = N
   
      existence = True
      GoTo Label1
     
End If

Next
__________________________________________________________

lorsque j'execute ce bout de code, un message d'erreurs s'affiche "NEXT Without For"

merci d'avance a tous

argentin7 · Accepted Answer

j ai trouvé la solution 
il manquait un end if cause de cette erreur

merci a tous

cs_Jack · Answer

lol, bah de rien ...
(j'arrive que 6h trop tard)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

Next without For

2 réponses

Votre réponse

Discussions similaires