Passer au prochain i d'une boucle dans un cas particulier

G

Guest

Guest

• 16 Mai 2008

• #2

Re : Passer au prochain i d'une boucle dans un cas particulier

bonjour Fab,

tel que tu nous donne les éléments, il suffit d'enlever le premier Next i comme ci-dessous

Code:

For i = 1 to 1000
If DateConcernee = 1 And TrancheHoraire = 23 Then
Variable = "Toto"
End If
Next i

A bientôt

 

Vote positif 0 Vote négatif

Spitnolan08

XLDnaute Barbatruc

• 16 Mai 2008

• #3

Re : Passer au prochain i d'une boucle dans un cas particulier

Bonjour,

Code:

 For i = 1 to 1000
    If DateConcernee = 1 And TrancheHoraire = 23 Then Variable = "Toto" : i=i+1
Next i

Cordialement

Edit : bonjour Hasco, pas compris la même chose...

 

Vote positif 0 Vote négatif

F

Fab117

XLDnaute Impliqué

• 16 Mai 2008

• #4

Re : Passer au prochain i d'une boucle dans un cas particulier

Merci pour vos réponses.
En fait je n'ai pas été assez clair.
Pour un i donné, la macro fait plusieurs choses (selectionne une cellule, l'explose, récupère le contenu explosé, ...).

For i = 1 to 1000
' toute une série d'opération

Ensuite, je teste un paramètre (une des parties explosées et le contenu d'une autre cellule). Dans un cas bien prècis, je ne souhaite pas que la macro continue, mais passe au i suivant.

Sinon (si la double condition n'est pas remplie), la macro a encore du bouleau avec ce i (aller dans un autre onglet recherché des correspondance).

Donc malheureusement, aucune de vos propositions ne va dans ce cas bien prècis.

Fab

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Mai 2008

• #5

Re : Passer au prochain i d'une boucle dans un cas particulier

Bonjour à tous,

Il te suffit de mettre la seconde partie dans un If qui fait tes tests...

ou si c'est trop compliqué, tu met :
Test du paramètre:
If BatteriedeTests then Goto FinBoucle
et tu mets
FinBoucle:
juste avant le Next

 

Vote positif 0 Vote négatif

Spitnolan08

XLDnaute Barbatruc

• 16 Mai 2008

• #6

Re : Passer au prochain i d'une boucle dans un cas particulier

Re,

Ton explication n'est guère plus claire...
Ce serait pourtant si facile de mettre la macro d'origine pour que l'on comprenne...
Donc, avec ce que j'ai compris une simple adaptation de mon code devrait suffire :

Code:

For i = 1 to 1000
'toute une série d'opération
    If DateConcernee = 1 And TrancheHoraire = 23 Then 
         Variable = "Toto" 
         i=i+1
     else
        'la macro a encore du bouleau avec ce i (aller dans un autre onglet recherché des correspondance).
     End if
Next i

Cordialement

 

Vote positif 0 Vote négatif

E

Eric 45

XLDnaute Occasionnel

• 16 Mai 2008

• #7

Re : Passer au prochain i d'une boucle dans un cas particulier

Bonsoir à tous

C'est vrai que ce n'est pas très clair quand on ne connait pas le code.
Une suggestion : un petit

Code:

exit for

après le

Code:

i=i+1

de fring ne ferait il pas l'affaire ?

Eric

 

Vote positif 0 Vote négatif

F

Fab117

XLDnaute Impliqué

• 16 Mai 2008

• #8

Re : Passer au prochain i d'une boucle dans un cas particulier

Salut,
Désolé si je n'ai pas été plus clair avec mon 2ème message.
N'étant plus au boulot, je ne peux pas joindre le code.
Mais d'après ce qu'a écrit tototiti2008, j'ai peut-être la solution à mon problème.
Est il possible de mettre une condition et que si elle est remplie il aille à un autre point de la macro via un Goto ?
Je ne connaissais pas. Quelqu'un aurait-il un exemple ?

Bon week-end.

Fab

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 16 Mai 2008

• #9

Re : Passer au prochain i d'une boucle dans un cas particulier

Bonjour,

Normalement avrec ce qu'a dit tototiti2008, cela devrait le faire!

Il suffit de l'adapter à ton code.

En VBA, il faut savoir tester et faire du debogage. Pour cela, tu mets un stop dans ton code puis F8 et ctrl+shift+F8 (on n'est jamais si bien servi que par soi-même).

 

Vote positif 0 Vote négatif