Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Clic bouton UserForm sauve et ferme le classeur mais ne ferme pas l'application excel

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Je vous souhaite une belle journée

Je n'arrive pas à trouver le bon code pour faire cette action complète :
Au clic sur le bouton "Quitter excel" de mon UserForm : le classeur est sauvegardé et fermé.
Je voudrais également que l'application excel se ferme.

J'ai fait des p'tites recherches et tentatives sans succès.
Auriez-vous le bon code ?
Je joins un fichier test,
Avec mes remerciement,
Amicalement,
lionel,
 

Pièces jointes

  • Sauve_classeur_ferme et quitte excel.xlsm
    25 KB · Affichages: 16
Trier par date Trier par votes

job75

XLDnaute Barbatruc
Bonjour Lionel, sylvanu,

La combinaison Close/Application.Quit est très classique :
VB: 
Private Sub Quit_catalogue_Click()
Unload Accueil
Application.Visible = True
With ThisWorkbook
    .Save 'enregistre
    If Workbooks.Count = 1 Then Application.Quit Else .Close
End With
End Sub
A+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

P
  • Question
Autres Evenements VBA - Fermeture du classeur (Croix grise sur fond jaune) / fermeture de l'application (Croix rouge sur fond blanc)
Réponses
12
Affichages
445
papat0
P
  • Résolu(e)
XL 2021 Fermer et enregistrer avec "NOM DE FICHIER" = contenu de A3
2
Réponses
17
Affichages
848
Usine à gaz
  • Résolu(e)
XL 2021 enregistrer à la fermeture au clic sur la "X" mon classeur à son emplacement (d'où il a été ouvert)
Réponses
14
Affichages
654
Usine à gaz
  • Résolu(e)
XL 2016 Copier un onglet dans un nouveau classeur excel et l'enregistrer
Réponses
3
Affichages
196
sylvanu
M
  • Résolu(e)
XL 2013 Gestion clic bouton UserForm
2
Réponses
23
Affichages
1 K
M.Ben
M
  • Question
XL 2016 Aide UserForm VBA Excel SVP
2
Réponses
21
Affichages
1 K
fanch55
  • Question
XL 2021 Besoin de modifier Workbooks("classeur1") selon le classeur ouvert
3 4 5
Réponses
64
Affichages
2 K
TooFatBoy
  • Résolu(e)
XL 2021 Quel code permettrait de refermer mon classeur si la date (les 10 derniers caractères du nom du classeur) ne correspondent pas à la date du jour ?
Réponses
7
Affichages
454
Usine à gaz
  • Question
Microsoft 365 Sharepoint ne prends pas en charge les classeurs excel avec macro :_)
Réponses
13
Affichages
689
Wayki
  • Résolu(e)
Microsoft 365 Simuler un double clic avec SendKeys
Réponses
12
Affichages
1 K
dysorthographie
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…