XL 2010 PB BOUCLE

[nadem0068]

Bonjour à tous,

je viens à nouveau vers vous car j'ai un petit souci de "boucle".
En effet j'ai créer une boucle qui vise a supprimer un nombre variable de ligne dans une liste selon une condition. Le problème c'est que ma boucle ne fait pas le travail du premier coût, je doit donc la répéter plusieurs fois pour obtenir l'effet voulus, ce qui d'une certaine manière réduit l’intérêt d'une boucle.

je joint un petit fichier pour tout ceux qui pourront prendre le temps de me donner un petit coup de pouce.

d'avance merci à tous!!!

 

[Chris24]

Bonsoir

comme ceci peut être

For x = 2000 To 1 Step -1

Cdt

 

[M12]

Bonsoir,
Le problème vient que tu fais partir ta boucle depuis le haut
En commençant par le bas, du premier coup c'est nettoyé

Sub SUPR_VALIDER()
'BOUCLE DE SUPPRESION DES "OM" REINTEGRE
Dim x As Integer
For x = 2000 To 1 Step -1
If Cells(x, 3).Value = "ok" Then
Rows(x).Delete
End If
Next x
End Sub

Doublez à une 1/100° de seconde (Bonsoir Chris24)

 

[nadem0068]

Bonjour à tous,

merci pour le petit coup de pouce ça marche super, je n'y aurais pas pensé tout seul.

bonne continuation!