OVH Cloud OVH Cloud

suppression de lignes

2 réponses
Avatar
jacques
=C0 tous les jours j'importe une liste dans excel. Mais il y=20
a des enregistrements ind=E9sirables qui se retrouvent dans=20
la liste. Je cherche le bon code qui pourrait supprimer=20
toutes les lignes qui contiennent dans la colonne A les=20
valeurs 9999 et les lettres sl

merci de votre aide

2 réponses

Avatar
AV
Pour éviter les boucles :

Sub zzz()
derL = [A65536].End(3).Row
Range("A1:A" & derL).AutoFilter Field:=1, Criteria1:="™99", _
Operator:=xlOr, Criteria2:="=sl"
Range("A2:A" & derL).SpecialCells(xlCellTypeVisible).EntireRow.Delete
[A1].AutoFilter
End Sub

AV
Avatar
JACQUES
un grand merci le tout fonctionne à merveille.



-----Message d'origine-----
Pour éviter les boucles :

Sub zzz()
derL = [A65536].End(3).Row
Range("A1:A" & derL).AutoFilter Field:=1,
Criteria1:="™99", _

Operator:=xlOr, Criteria2:="=sl"
Range("A2:A" & derL).SpecialCells
(xlCellTypeVisible).EntireRow.Delete

[A1].AutoFilter
End Sub

AV


.