Pb_copier/coller

Question

Bonjour, j'ai un problème au niveau de mon ActiveSheet.Paste dans mon code, l'erreur ' Impossible de coller les informations car les zones de copier et de collage sont de forme et de taille différentes ':

Sub Macreation()

Workbooks.Add

Dim namenewfichier As String

namenewfichier = ActiveWorkbook.Name

Windows("Finalv2.xlsm").Activate

Sheets("Feuil3").Cells.Select

Selection.Copy

Windows(namenewfichier).Activate

Sheets("Feuil1").Cells.Select

ActiveSheet.Paste

Application.CutCopyMode = False

End Sub

Je pense que c'est un problème de format car les données que je copie sont assez volumineuses ( 70.000 lignes et 200 colonnes ) .

Auriez-vous une idée svp pour que le fichier dans lequel je colle ses données soit ' formaté ' pour que le collage réussisse ? :/

Merci pour votre aide !

M12 · Answer

Teste en remplaçant Sheets("Feuil1").Cells.Select par Sheets("Feuil1").range("A1").Select...