Bonjour,

Je travaille sur un fichier csv de plus de 30 000 lignes.
Je filtre comme ceci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Set Plage = Workbooks("test.csv").Sheets(1).Range("A1:J65000")
Plage.AutoFilter Field:=5, Criteria1:="ping"
Sheets.Add
Plage.SpecialCells(xlCellTypeVisible).Copy Workbooks("test.csv").Sheets("Feuil1").Range("A2")
Plage.AutoFilter
Le filtre "ping" renvoie à peu près 14 000 lignes.
C'est lors de la copie dans une sheets du même fichier, que l'erreur 1004 apparait.
Lorsque je filtre sur un critère qui renvoie moins de lignes, je n'ai pas d'erreur.

Je ne comprend pas trop ce qui peut coincer..

(A savoir que le même code sous 2010 fonctionne parfaitement...)


Merci d'avance.