Message

[Tony]

Re bonjour à tous et à toutes

Comment empécher le message 'Voulez-vous enregistrer les modifications apportées à nom du classeur ?'. Qui apparait à la fermeture du classeur.
Je souhaite des explications pas des macros toutes faites. (Je cherche à comprendre et à me former)

Cette formule : Application.DisplayAlerts = False, est-elle bonne?
J'ai tenter mais rien.

@ +
Tony

 

[Robert]

Bonjour Tony, bonjour le forum,

Si tu quittes un fichier juste après l'avoir enregistré/sauvé, ce message n'apparaît pas. Si par contre tu sauves le fichier puis tu modifies une seule chose, quand tu va vouloir le quitter, ce message apparaîtra. Donc en VBA si tes dernières lignes sont :

Workbooks('Toto.xls').Save
Workbooks('Toto.xls').Close

tu n'auras pas de message...

 

[PascalXLD]

Bonjour

tu peux dans le code de Thisworkbook ajouter


si tu veux que ton fichier soit sauvegardé sans message

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close True
End Sub

ou

si tu veux que ton fichier ne soit pas sauvegardé sans message

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close False
End Sub

 

[Tony]

Salut Robert

Je m'excuse mais pas tous compri

Tony

 

[Tony]

Re

Ohla Vous allez trop vite pour moi :S

Pas le temps de répondre à post que déjà il y en avait un autre
Je te remercie Pascal76
je vais tenter ta solution.

@ +

Tony

 

[Tony]

Re Pascal76

Ta solution marche très bien, mais
je tombe sur une page grise, nommée 'Microsoft Excel'
je suis donc obliger de la fermer par le bouton de fermeture.
Je voudrais arriver directement sur le bureau (pas la table 😉 )

Merci

Tony

 

[PascalXLD]

RE

Oui mais dans ce cas il faut que tu ferme non seulement ton fichier mais aussi Excel

Et si tes users ont un autre fichier en cours

ALors là patatra

Regarde ce fil avec le post de TI

Lien supprimé

Bon courage

 

[Tony]

Re

Je joins mon code pour explication

Private Sub workbook_beforeclose(cancel As Boolean)
    ThisWorkbook.Close True
    
End Sub

Tony