Gestion des erreurs - nom macro/numéro module Fermé

Question

Bonjour, 

J'ai créé un msgbox qui s'exécute à la place de la boite de dialogue "débogage" quand on a un problème de macro.

J'aurai voulu que ça me rajoute dans les données suivantes automatiquement :

Numéro du module

Nom de la macro

mais je ne trouve pas comment le faire sans entrée les données par macro ?

errorHandler:MsgBox "Une erreur s'est produite!" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Desciption de l'erreur:" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Err.Description & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Si vous n'arrivez pas à résoudre le problème :" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "1. Enregistrez le fichier" & Chr(13) & Chr(10) & "2. Contactez l'administrateur en indiquant les données ci-dessous" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Module numéro" & " ? " & Chr(13) & Chr(10) & "Nom Macro" & " ? "

Nono · Answer

J'ai déjà trouvé comment insérer le numéro du module ! 

Il me reste encore à trouver le nom de la macro 

MsgBox "Une erreur s'est produite!" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Desciption de l'erreur:" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Err.Description & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Si vous n'arrivez pas à résoudre le problème :" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "1. Enregistrez le fichier" & Chr(13) & Chr(10) & "2. Contactez l'administrateur en indiquant les données ci-dessous" & Chr(13) & Chr(10) & Chr(13) & Chr(10) &  application. VBE. ActiveCodePane.CodeModule & Chr(13) & Chr(10) & "Nom Macro"  & « ? »

Gestion des erreurs - nom macro/numéro module

1 réponse

Discussions similaires