Discussion :

[dozif77]

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

[kiki29]

Salut, commence par lire et assimiler : Lire et écrire dans les classeurs Excel fermés

[dozif77]

salut,merci pour la réponse mais je souhaits sur le fichier destination ouvert mais si par erreur il est fermé je veux contourné le problème

[joe.levrai]

Bonjour,

il te suffit de tester si le fichier est déjà ouvert ... si c'est pas le cas tu l'ouvres et ensuite tu copies la feuille

fait une recherche rapide sur le forum, y'a des dizaines de méthodes pour tester ça