Macro pour enregistrer fermer autres fichiers xlsx Résolu/Fermé

Question

Bonjour à tous !

J'essaie tant bien que mal à coder une macro au clic sur un bouton mais je n'arrive pas à résoudre mon problème qui est assez simple :

J'ai une vingtaine de fichiers excel ouverts en dehors de celui où est codée ma macro. Je désirerais que ma macro ferme au clic, les 20 autres fichiers excel ouverts par ailleurs.

Pour les ouvrir j'utilise la fonction Workbooks.Open ( chemin d'accès du fichier )
Existe-t-il deux fonctions similaires pour enregistrer et fermer mes fichiers, du genre Workbooks.Save ( chemin d'accès du fichier ) et Workbooks.Close ( chemin d'accès du fichier ) ? car je n'arrive pas à les trouver
J'ai cependant trouver une commande "ActiveWorkBook Save" mais je n'arrive pas à savoir si elle enregistrer seulement le fichier actif ou bien tous ceux qui sont ouverts ...

Auriez-vous une petite idée de comment m'en sortir ?

Merci !

JCB40 · Answer

Bonjour

A tester
Sub Fermeture()
Dim Wbk As Workbook

  For Each Wbk In Workbooks
    If Wbk.Name <> ThisWorkbook.Name Then
      Wbk.Save
      Wbk.Close
    End If
  Next Wbk
End Sub

Cordialement