Bonjour Joël,
Désolé pour mes doublons!
Merci pour ton retour, j'ai donc essayé avec le code ci-dessous je prends une erreur 400. Et plus rien ne se lance du tout.
Sub recup()
Dim CD As Workbook 'déclare la variable CD (Classeur Destination)
Dim OD As Worksheet 'déclare la variable OD...