Bonjour,
Alors voici mon point dur. Je fais deux tris dans dans un tableau (Tableau6), après les tris, je copie le résultat vers un autre classeur ("Delta") (qui me servira de base de sonnées). Mais quand j'exécute mon code, lors du collage j'ai des lignes vides qui apparaissent après la dernière ligne non vide.
wsSource.ListObjects("Tableau6").Range.AutoFilter Field:=32, Criteria1 _
:=Array("O", "P", "V"), Operator:=xlFilterValues
wsSource.ListObjects("Tableau6").Range.AutoFilter Field:=39, Criteria1 _
:="KI"
With wsSource.Range("Tableau6[#data]").Columns("A:AM")
shtExport.Rows(2).Resize(.Rows.Count).Insert
.Copy shtExport.Range("A2")
End With
Set shtExport = Nothing
Comment je pourrai faire pour n'avoir que les cellules non vides!?? je voudrais copier et coller de la 1ère ligne à la dernière ligne non vide du tableau après les filtres