Forcer un enregistrement

Bonjour

2 choses :

1/ je ne me repelle plus du code pour fermer excel, pas seulement la feuille

ActiveWorkbook.Saved = True

mais le classeur entier.

2/ Forcer l'enregistrement, si le dossier existe déjà et le remplacer par le nouveau;

merci

cordialement

Bonsoir,

peut-être avec ce code :

Sub enregistre_et_ferme()
Application.DisplayAlerts = False
ActiveWorkbook.Close True
End Sub

C'est bon pour le forçage, mais pas pour fermer excel, cela ferme seulement la feuille, et non le classeur.

merci quand même

Re-,

cela ferme bien le classeur, mais ne ferme pas Excel

PS, pour info, évite de mettre un fichier exemple avec le code ci-dessous, c'est très désagréable de voir Excel se fermer, alors qu'on travaille sur plusieurs fichiers simultanément........

Ce code enregistre ton fichier, le ferme, mais ferme ÉGALEMENT Excel.....

Sub ferme()
With Application
    .DisplayAlerts = False
    ActiveWorkbook.Save
    .Quit
End With
End Sub

Merci a tous problème résolus

bonne soirée