Sauvegarde des classeurs Excel

Bonjour comment allez vous ? bien j'espere
je gere deux classeur a partir d'un seul userform
je voudrais faire la sauvegarde de mes deux classeurs a partir d'un bouton
voici le code du bouton

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub BtnSauvegarde_Click() Dim Chemin As String, Fichier As String   Chemin = "C:\Sauvegarde\" 'Ajoute la date du jour dans le nom du fichier Fichier = "NomClasseur_" & Format(Date, "yyyymmdd") & ".xls"   ActiveWorkbook.SaveCopyAs Chemin & Fichier End Sub

---

le code va, il ya sauvegarde mais le deuxieme classeur ne s'ouvre pas, on me dit que le classeur a été soit renommé, supprimé ou deplacé

Bonjour,
Votre question ou le code affiché est incomplet

Citation:

---

le code va, il ya sauvegarde mais le deuxieme classeur ne s'ouvre pas, on me dit que le classeur a été soit renommé, supprimé ou deplacé

---

En effet dans ce code on ne voit nulle part de code pour ouvrir un classeur quelconque

Citation:

---

je voudrais faire la sauvegarde de mes deux classeurs a partir d'un bouton

---

Dans le code affiché, il n'y a qu'un seul classeur copié

le classeur principal est "un" et l'autre "deux"
comment dois-je manipuler mon code afin de les sauvegarder tous les deux ?