Boucle "for"- ne se répète pas lorsque le résultat est vrai

Bonjour,

J'ai une boucle qui permet de supprimer les lignes lorsque (Colonne O >0 et colonne P ="")

Lorsque je lance la macro, elle s’arrête dès qu'une ligne est supprimée.

Avez vous une solution?

Merci d'avance

Le code:

Sub MAJdescdesupprimer()

Dim ISuividebut As Integer

Worksheets("SUIVI_FAI").Activate

'recherche dernière line de l'extract SUIVI_FAI_A350-1000

ISuivifin = Worksheets("SUIVI_FAI").Range("A3").End(xlDown).Row

'boucle de recherche

For ISuividebut = 3 To ISuivifin

'Recherche de la commande supérieur à ""

If Worksheets("SUIVI_FAI").Range("O" & ISuividebut) > "0" Then

'Recherche de l'indice cde =0

If Worksheets("SUIVI_FAI").Range("P" & ISuividebut) = "" Then

Rows(ISuividebut).Delete

Exit For

End If

End If

Next ISuividebut

End Sub

Encore merci

AnthonyD


Re bonjour,

Je peux envoyer un fichier si besoin.

Cordialement

AnthonyD

Enlève le exit for...

Merci beaucoup

Erreur de débutant..

Hélas elle continu a bloquer, cette fois au bout de 5 ou 6 lignes.

J'ai peut être un problème de format dans mes cellules pour le( > 0 et le ="").

Je vais essayer de trouver ça.

Encore merci pour 'aide

Bonne journée

AnthonyD

EngueEngue a écrit :

Enlève le exit for...

En fait le problème c'est que ma macro démarre par la ligne 3.

Quand la ligne se supprime elle passe à la ligne suivante donc une ligne peut passer au travers...

Je vais essayer de faire remonter ma boucle en démarrant de la fin..

Bonne journée

AnthoyD

Ce que tu dois comprendre c'est que si tu efaces une ligne la ligne devient la ligne n-1

Donc au lieu d'aller du début à la fin je te recommande d'aller de la dernière au début.

For ISuividebut =  ISuivifin to 3 step -1

Edit : Nos commentaires se sont croisés..

EngueEngue a écrit :

Ce que tu dois comprendre c'est que si tu efaces une ligne la ligne devient la ligne n-1

Donc au lieu d'aller du début à la fin je te recommande d'aller de la dernière au début.

For ISuividebut =  ISuivifin to 3 step -1

Edit : Nos commentaires se sont croisés..

Oui ,

Merci pour le coup de pouce. Ca fait quelques jours que je suis sur 2 macro (J'ai mis un post pour l'autre aussi...)

Je suis encore débutant est c'est pas évident

A+

AnthonyD

Rechercher des sujets similaires à "boucle repete pas lorsque resultat vrai"