XL 2010 Gestion d'erreur

TheProdigy · 8 Juin 2018

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 · 9 Juin 2018

Salut Adilprodigy,

Pour moi, tu déclare une Constante public

Code:

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

Code:

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

A+

XL 2010 Gestion d'erreur

TheProdigy

XLDnaute Impliqué

Compte Supprimé 979

Guest

Discussions similaires