Hulk
XLDnaute Barbatruc
Hello tout e monde,
C'est terrible je n'arrive pas à trouver le code pour un CommandButton pour fermer et avoir le même message que lorsqu'on clique sur la croix en quittant.
Je m'explique :
Si j'ai deux classeurs ouverts et je quitte en cliquant sur la croix, il va me demander si je veux fermer et enregistrer les deux classeurs.
(Il me donne le choix entre "Oui/Oui pout tout/Non/Annuler")
Si je n'ai qu'un classeur ouvert, il me demande si je veux fermer et enregistrer le classeur. ("Oui/Non/Annuler")
Je souhaite la même chose, mais sans devoir passer par un MsgBox ou un USF, simplement qu'il fasse la même chose qu'avec la croix !
Possible
Pour l'instant j'ai ceci
mais sans succès.
Merci pour votre aide, Hulk.
C'est terrible je n'arrive pas à trouver le code pour un CommandButton pour fermer et avoir le même message que lorsqu'on clique sur la croix en quittant.
Je m'explique :
Si j'ai deux classeurs ouverts et je quitte en cliquant sur la croix, il va me demander si je veux fermer et enregistrer les deux classeurs.
(Il me donne le choix entre "Oui/Oui pout tout/Non/Annuler")
Si je n'ai qu'un classeur ouvert, il me demande si je veux fermer et enregistrer le classeur. ("Oui/Non/Annuler")
Je souhaite la même chose, mais sans devoir passer par un MsgBox ou un USF, simplement qu'il fasse la même chose qu'avec la croix !
Possible
Pour l'instant j'ai ceci
Code:
Private Sub CommandButton1_Click()
Application.DisplayAlerts = True
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Merci pour votre aide, Hulk.