Bonjour,
Je voulais savoir s'il y avait une méthode plus simple que ce j'ai fait...
Voici le code
Le code permet de trier dans la colonne AM sur une date.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 ActiveSheet.Range("$A$1:$AM$2500").AutoFilter Field:=39, Criteria1:= _ ">03/31/2016", Operator:=xlAnd Set miPlage = Range("A65536:" & Range("AN65536").End(xlUp).Address).SpecialCells(xlCellTypeVisible) miPlage.Copy Destination:=Sheets("retraitements").Range("A1") Set miPlage = Nothing
S'il y a des lignes qui sont concernées (donc supérieur à cette date) alors je la copie vers un autre onglet..
Partager