Accès au debugger + On ERR goto msgbox
Fermé
Mimimathie
-
21 juil. 2017 à 16:03
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 - 21 juil. 2017 à 23:15
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 - 21 juil. 2017 à 23:15
A voir également:
- Accès au debugger + On ERR goto msgbox
- Acces rapide - Guide
- Comment autoriser l'accès au stockage android - Guide
- Accès refusé - Guide
- Compte facebook piraté plus d'accès - Guide
- Pourquoi google me bloque l'accès de certain sites ? - Guide
1 réponse
eriiic
Messages postés
24600
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
21 octobre 2024
7 240
21 juil. 2017 à 23:15
21 juil. 2017 à 23:15
Bonjour,
avec Resume c'est possible. Ex :
Pour info On Error GoTo -1 n'a rien à voir avec 'ligne précédente'.
Goto -1 réinitialise en plus le gestionnaire d'erreur contrairement à goto 0. Utile si tu as plusieurs traitements en cascade, en théorie tu ne peux pas faire un traitement d'erreur si tu es déjà dans un autre.
eric
avec Resume c'est possible. Ex :
Sub test_OnError() Dim a As Long On Error GoTo erreur1 a = 1 + "erreur" On Error GoTo -1 'suite du code '... Exit Sub erreur1: MsgBox "erreur sur somme" & vbLf & "retournez sur la ligne en erreur en pas à pas avec 2 fois F8" Stop Resume End Sub
Pour info On Error GoTo -1 n'a rien à voir avec 'ligne précédente'.
Goto -1 réinitialise en plus le gestionnaire d'erreur contrairement à goto 0. Utile si tu as plusieurs traitements en cascade, en théorie tu ne peux pas faire un traitement d'erreur si tu es déjà dans un autre.
eric