XL 2010 Gestion d'erreur

[TheProdigy]

Bonjour,

Je voudrais savoir s'il y a une possibilité à n'importe quel moment d'un fichier EXCEL VBA.

S'il y a une erreur ne pas enregistrer et sortir?

Merci beaucoup

 

[Compte Supprimé 979]

Salut Adilprodigy,

Pour moi, tu déclare une Constante public

Public Const FlgErreur As Boleean = False

Ensuite dans chaque procédure tu ajoutes un "On Error Goto Erreur_Proc"
Dans Erreur_Proc, tu mets : FlgErreur = True

Et pour Finir, dans ThisworkBook, un truc du style

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  Cancel = True
  Application.DisplayAlerts = False
  Application.Quit
End Sub

A+