Filtre vba
Bonjour,
Je cherche à corriger mon code svp,
dans ma base je veux garder que les ligne JAN FEV MAR et supprimer le reste
With Worksheets("Base")
Range("c3:c3000").AutoFilter Field:=3, Criteria1:(<>"Janvier", <>"Février", <>"Mars", "="), Operator:=xlFilterValues
Range("c3:c3000").Offset(1, 0).Resize(Range("c4:c3000"). _
Rows.Count - 1).SpecialCells(xlCellTypeVisible).Delete Shift:=xlUp
ActiveSheet.ShowAllData
END WITH
Je cherche à corriger mon code svp,
dans ma base je veux garder que les ligne JAN FEV MAR et supprimer le reste
With Worksheets("Base")
Range("c3:c3000").AutoFilter Field:=3, Criteria1:(<>"Janvier", <>"Février", <>"Mars", "="), Operator:=xlFilterValues
Range("c3:c3000").Offset(1, 0).Resize(Range("c4:c3000"). _
Rows.Count - 1).SpecialCells(xlCellTypeVisible).Delete Shift:=xlUp
ActiveSheet.ShowAllData
END WITH
1 réponse
-
ContributeurBonjour
les filtres posent problème au delà de 1000 lignes...
qu'il y a t il dans la colonne C: date, jan, janvier... ?
-
-
Contributeur@xmma1995Bonjour,
Que veux tu que je fasse pour t'aider si tu ne réponds pas à mes questions....
Bonne continuation
-
