Bonjour a tous
je suis débutant en vba
j'ai une macro pour enregistrer un fichier dans un autre quant il est ouvert mais lorsque je fais la même opération avec le fichier destination fermé il y a une erreur 9.je souhaits si le fichier est fermé de pouvoir le sélectionné pour l'enregistrer .

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub CommandButton8_Click()
 Sheets("Feuil1").Copy After:=Workbooks("ClasseurB.xlsx").Sheets(1)
 
    ActiveSheet.Name = Format(Date, "dd-mmmm-yyyy") & "_" & Format(Time, "hh-mm-ss")
    ActiveWorkbook.Save
   ' ActiveWorkbook.Close
    Windows("Tableau de Production S21.xlsm").Activate
End Sub