Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Erreur dans procedure...

Erreur dans procedure...

1 réponse
Avatar
Al
Bonjour à tous,

J'ai un code qui contient beaucoup de procedures et de lignes...
Je n'ai pas finalisé la gestion des erreurs, mais je voudrais savoir, si une
erreur se produit, dans quelle procedure elle se produit...
Il faudrait que le nom de la procedure apparaisse dans mon message d'erreur.
Ca me faciliterait le repérage de l'erreur, au lieu de le faire pas à pas...

Est ce possible ?

Merci pour votre aide
Al
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
MichD
Bonjour,

Je crois que le plus simple, c'est quelque chose comme ceci:
Tu appliques ce type de gestion d'erreur pour chacune des
procédures.

'--------------------------------------------
Sub Test()
Dim GestionErreur As String
Dim ProcName As String

'Tu affectes à la variable le nom de la procédure
'où le code est écrit, et ce pour chaque procédure.

NomProc = "Test()"
On Error GoTo GestionErreur

'Le code

Exit Sub

GestionErreur:
MsgBox "Une erreur " & Err.Number & " s'est produite. " & _
Err.Description & vbCrLf & vbCrLf & "" & _
"Nom de la procédure """ & NomProc & """."

'Si tu veux que la procédure continue l'exécution du code à partir
'de la ligne suivante :
Resume Next

End Sub
'--------------------------------------------

MichD
---------------------------------------------------------------