Gestion des erreurs - nom macro/numéro module
Nono
-
Nono -
Nono -
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 ?
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" & " ? "
A voir également:
- Gestion des erreurs - nom macro/numéro module
- Numero prive - Guide
- Numéro père noël whatsapp - Accueil - Messagerie instantanée
- Logiciel gestion locative gratuit excel - Télécharger - Comptabilité & Facturation
- Logiciel gestion photo gratuit - Guide
- Numero imei - Guide
1 réponse
J'ai déjà trouvé comment insérer le numéro du module !
Il me reste encore à trouver le nom de la macro
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" & « ? »