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