Bonjour,

Je suis un debutant en VBA et je bloque sur un sujet.
Sur une feuille j'ai un Tableau Croise Dynamique qui se met a jour quand les donnees changent et je veux ensuite copier et coller ces donnees dans un autre classeur. Or si la premiere colonne est remplie le copier sur la seconde et ainsi de suite...

J'ai realise ce premier code la qui me met erreur :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub Button2_Click()
 
Worksheets("By_CdG").Range("C2:C51").Copy '--> je selectionne ma plage de cellule a copier
 
Workbooks.Open ("C:\Thibault\Gestion des litiges\Suivies litiges.xlsm") '--> J'ouvre mon fichier cible
 
Workbooks("Suivies litiges.xlsm").Activate '--> Je l'active 
 
Worksheets("By_CdG").Paste Destination:=Worksheets("data").Cells(2, Column.Count).End(xlToRight)(2) '--> Et je copie (je veux que les valeurs et le format)
 
End Sub
Or ce code ne mache pas et je me demande pourquoi. J'ai erreur 424 (?)
Je voudrai ensuite copier ma plage a partir de C2 puis si c'est remplie D2 puis E2...

Pouvez-vous m'aider svp??