Bonjour,
j'ai une étude avec deux fichiers Excel dans 2 classeurs différents.
Mon fichier 1 "base1" doit être supprimer pour être ensuite remplacer par le contenu de mon ficher 2 "Feuil1" qui est dans le repertoire : "J:\_REQ\nouveau.fichier.xlsx" .
j'ai essayer ce code, la suppression se fait mais il n'arrive a coller les nouvelles données
Sub MACopie()
Dim shA As Worksheet 'Feuille A
Dim wB As Workbook 'Classeur B
Set shA = Sheets("base1")
shA.Cells.ClearContents 'efface données
Set wB = Workbook.Open(Filename:="J:\_REQ\nouveau.fichier.xlsx")
shA.Cells.Value = wB.Sheets(“Feuil1”).Cells.Value
End Sub
Qu'est ce qu'il ne va pas dans ce code?
Bonne journée