code de fermeture

[Cuistoy]

Bonsoir le forum

je recherche 2 code

1 ) pour quitter enregistrer et fermé la page excel

l'autre pour quitter sans enregistrer et quitter excel

J'ai trouvé celui là mais ne quitte pas excel reste la page vide d'excel


Sub auto_open()
Sheets('Effectifs').Select
End Sub

Sub quitter()
ThisWorkbook.Close savechanges:=True
End Sub

merci pour vos reponce Cuistoy

 

[gex1403]

Salut Cuistoy

Rajoute Application quit et c'est bon

 

[gex1403]

Re , mets ce code sur un bouton et c tout bon

Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.DisplayAlerts = True
Application.Quit

@micalement

 

[cuistoy]

merci gex1403 pour ta reponce je teste imediatement

a bientôt