Filtrer les lignes avant de les supprimer vba.

Résolu/Fermé
mmxa1995 Messages postés 28 Date d'inscription mardi 12 avril 2016 Statut Membre Dernière intervention 21 avril 2016 - 13 avril 2016 à 14:15
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 - 13 avril 2016 à 16:01
Bonjour,

j'essaie de filtrer la colonne C "service" pour garder que ser0 + le titre de la colonne et supprimer les lignes qui contiennent ser1 ser2 ser3 ser4,

je vous remercie

Rows("4:4").Select
Selection.AutoFilter
ActiveSheet.Range("$C$4").AutoFilter Field:=7, Criteria1:=Array("ser1", "ser2", "ser3", "ser4", "="), Operator:=xlFilterValues


Cells.Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Delete Shift:=xlUp


A voir également:

1 réponse

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
13 avril 2016 à 16:01
Bonjour Mmxa, bonjour le forum,

Tu parle de filter la colonne C (=3) et tu codes :

ActiveSheet.Range("$C$4").AutoFilter Field:=7, Criteria1:=Array("ser1", "ser2", "ser3", "ser4", "="), Operator:=xlFilterValues 

Field:= 7 ???

0