Copier coller sans ouvrir le fichier destination

Private Sub CommandButton2_Click()
'envoyer le retour à la prod

Dim wB As Workbook
    Sheets("à envoyer à la prod").Select
    'Cells.Select

    Range("A3:n1000").Select
    Selection.Copy
    'fichier destination '''je ne veux pas l'ouvrir 
    Set wB = Workbooks.Open(Filename:="s:\demande\prodmain.xlsm")
    Sheets("Retours de maintenance").Range("a2").Select
    ActiveSheet.Paste

    Application.CutCopyMode = False

End Sub

bonjour à tous,

je sollicite votre aide svp

je veux copier coller des cellule du fichier 1 vers fichier 2

sachant que je suis dans le fichier 1

mais je ne veux pas ouvrir le fichier 2 pour coller

voici mon code qui fais copier coller mais en ouvrant le fichier 2

comment faire ?

Merci

Bonjour Imad SIO,

Sans ouvrir le fichier, il faut regarder du côté de la méthode ADODB

https://forum.excel-pratique.com/excel/lire-et-ecrire-dans-les-classeurs-excel-fermes-t70176.html

A+