Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
815 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBA - Forcer la boucle

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

VBA - Forcer la boucle

n°1019690
nobilis
Posté le 21-03-2005 à 13:14:35  profilanswer
 

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

mood
Publicité
Posté le 21-03-2005 à 13:14:35  profilanswer
 

n°1019955
knakes
Posté le 21-03-2005 à 17:23:20  profilanswer
 

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

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBA - Forcer la boucle

 

Sujets relatifs
Url Rewriting : boucle ?VBA macro pb
Inhiber une boite de dialogue sous VBA Excelmacro boucle
BOUCLE[VBA] syntaxe textbox sous access
L AIDE D UN EXPERT EN VBA SVP[VBA] Excel : perte variables globales sans fermer le classeur
[VBA]Auriez vous un livre a me conseiller pour m initier au vba[VB/VBA/VBS] Lier 2 bases access avec VB6
Plus de sujets relatifs à : VBA - Forcer la boucle


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR