Enregistrer "tout" en quittant Excel 2016

[maxwellou]

Bonjour,

Pourriez-vous m'aider à trouver une solution pour tout enregistrer en 1 click l'ensemble des fichiers ouverts dans Excel (2016) ?

Merci
Bien à vous.

 

[harry226h]

Bonjour Maxwellou, le forum
A tester

Sub save()
Dim Wb As Workbook
For Each Wb In Workbooks
Wb.Save
Next Wbk
End Sub

cdt

A

 

[maxwellou]

Merci Harry226h,

J'ai un message comme suit "Le membre existe déja dans un module objet dont le présent module est dérivé".

Et de plus, ce code n'est-il pas valable uniquement pour un fichier ? Comment faire pour que la fonctionnalité que je recherche soit disponible à chaque fois que j'ouvre Excel ?

Merci

 

[riton00]

Bonsoir,

Voir ICI

Slts