Copier colonne par VBA et Taille de fichier

Bonjour à tous,

j'ai un fichier qui comprend une feuille avec beaucoup de données (Export).

et une macro qui fait un filtre et copie les résultat du filtre sur une 2e feuille (Feuil2).

ThisWorkbook.Sheets("Export").Range("A1").AutoFilter Field:=5, _

Criteria1:="FRM_CIT"

' copie des donnees

ThisWorkbook.Sheets("Export").Range("K:K").Copy ThisWorkbook.Sheets("Feuil2").Range("AA10")

Cela fonctionne bien, mais mon fichier est très volumineux (65 Mo).

Est ce que le fait de coller la colonne entière même quand il n'y a qu'une dizaine de données peut alourdir le fichier ?

(je me suis rendu compte que apres le collage, la feuille comprend 65 000 lignes)

Si oui, comment faire pour ne coller que le nombre de valeur que contient la colonne après le filtre et non pas toute la colonne?

Si cela n'a pas d'incidence, a quoi pourrait être du une telle taille de fichier ??

Merci pour votre aide !

Bonjour,

Tu pourrais identifier la dernière ligne renseignée

derligne = ActiveSheet.Cells(Rows.Count, "K").End(xlUp).Row

En espèrant que cela t'aide

Merci beaucoup pour cette réponse rapide.

Concernant la taille du fichier, je ne comprend pas trop ...

J'ai sauvegardé une copie, tout fonctionne et le fichier est passé de 65 Mo à 563 Ko ...

J'avais peut être fait une erreur lors d'une macro précédente qui avait entraîné ce dysfonctionnement ...

Bonjour,

Content que tu aies pu résoudre ton problème