[RESOLU] : SVP comment eviter l'affichage ce message

[MADAGASCAR]

Bonsoir EXCEL DOWNLOADS
Bonsoir à tous et à toutes
SVP chers membres .. est ce que c'est possible d'eviter l'affichage de ce message .. qui est dans l'image si dessous
Merci beaucoup d'avance pour l'aide
Cordialement
MADA BLACK

 

[Papou-net]

Re : SVP comment eviter l'affichage ce message

Bonsoir MADAGASCAR,

Oui c'est possible mais tout dépend du contexte.

Dans quelles circonstances s'affiche ce message: à la fermeture du classeur ou autre? Faut-il valider ou enregistrer?

A +

Cordialement.

 

[Herdet]

Re : SVP comment eviter l'affichage ce message

Bonjour,
Comme s'apprête à le dire Papou-net 😱
Application.DisplayAlerts = False ' désactiver les alertes
'.... réaliser les actions
'.....
Application.DisplayAlerts = True ' réactiver les alertes

A+
Robert

 

[MADAGASCAR]

Re : SVP comment eviter l'affichage ce message

Bonsoir Papou-net
Merci pour votre intention d'aide
Je veux faire à la fermeture de classeur .. sortir sans enregistrer les modification .. sortir c'est sortir et c'est tout
Merci beaucoup d'avance
Cordialement
MADA BLACK

 

[Herdet]

Re : SVP comment eviter l'affichage ce message

Bonsoir Papou-net
Merci pour votre intention d'aide
Je veux faire à la fermeture de classeur .. sortir sans enregistrer les modification .. sortir c'est sortir et c'est tout
Merci beaucoup d'avance
Cordialement
MADA BLACK

Pour fermer un classeur sans enregistrement, c'est plutôt Activeworkbook.Close SaveChanges:=False

 

[MADAGASCAR]

Re : SVP comment eviter l'affichage ce message

Bonsoir Herdet
Merci beaucoup pour votre code mais je l'ai mis dans Thisworkbook mais comme meme ce message s'affiche devant moi a la fermeture de classeur
Cordialement
MADA BLACK

 

[MADAGASCAR]

Re : SVP comment eviter l'affichage ce message

Bonsoir Herdet
Regardez svp ce que j'ai obtenu lorsque j'ai mis ce dernier code.quand j'ouvre le classeur a nouveau
Cordialement
MADA BLACK

 

[JCGL]

Re : SVP comment eviter l'affichage ce message

Bonjour à tous,

Peux-tu essayer :

Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Saved = True
End Sub

A+ à tous

 

[MADAGASCAR]

Re : SVP comment eviter l'affichage ce message

Bonsoir JCGL
Merci beaucoup pour l'impeccable code .. simple et efficace
Oui c'est exactement ce que je veux avoir
C'est bien résolu
Congratulation JCGL
Longue vie a toi et au forum
Cordialement
MADA BLACK