VBA - Forcer la boucle

VBA - Forcer la boucle - VB/VBA/VBS - Programmation

Marsh Posté le 21-03-2005 à 13:14:35    

Bonjour,
 
Je voudrais forcer le redémarrage de la boucle for Col... si la condition IF est vrai.  Comment faire ?
 
Ligne = 0
For Col = 0 To 23
        If tabCol(Ligne, Col) <> "0" Then
        tabPremCol(Ligne, 0) = tabCol(Ligne, Col)
        Ligne = Ligne + 1
        End If
Next Col
Merci

Reply

Marsh Posté le 21-03-2005 à 13:14:35   

Reply

Marsh Posté le 21-03-2005 à 17:23:20    

Essaie cela :

Code :
  1. Ligne = 0
  2. reboucle :
  3. For Col = 0 To 23
  4.         If tabCol(Ligne, Col) <> "0" Then
  5.         tabPremCol(Ligne, 0) = tabCol(Ligne, Col)
  6.         Ligne = Ligne + 1
  7.         End If
  8. Next Col
  9. If tabCol(Ligne, Col) <> "0" Then Goto reboucle


Message édité par knakes le 21-03-2005 à 17:23:40
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed