Enregistrer un fichier dans 2 autres fichiers

bonjour,je cherche a enregistrer un fichier excel dans deux autres fichiers et que le fichier ouvert reste et que les deux se ferme apres enregistrement

merci pour vos reponse

Bonsoir Cage, bonsoir le forum,

Avec un code de ce style :

Sub Macro1()
Dim CO as Workbook
DIM NC as Workbook

Set CO = ThisWorkbook
CO.SaveAs("Ton_Chemin" & "\" & "Ton_nom1.xlsx")
SET NC = ActiveWorkbook
NC.Close SaveChanges:=False
CO.SaveAs("Ton_Chemin" & "\" & "Ton_nom2.xlsx")
SET NC = ActiveWorkbook
NC.Close SaveChanges:=False
End Sub

bonsoir merci pour ta reponse ca m aide beaucoup