IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Discussion :

Gestion d'erreur avec la ligne incriminée


Sujet :

VBA

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Novembre 2006
    Messages
    30
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2006
    Messages : 30
    Points : 20
    Points
    20
    Par défaut [Résolu]Gestion d'erreur avec la ligne incriminée
    Bonjour,
    je suis développeur de solution technique sur mon temps libre et dessinateur professionnel sous autocad depuis 2 ans et développeur sur mon temps libre pour gagner du temps au travaille. Je programme essentiellement en VBA pour autocad, mais ça peu importe puisque ma question est d'ordre générale :

    Mes programmes commence à être long (pour moi oui c'est long) environ 400 lignes pour la procédure principale avec 4 ou 5 procédures récurrentes auxquelles je fais appelle de temps en temps et parfois 1 ou 2 forms. Pour des raisons lié à la gestion des interceptions utilisateur (question posée à l'utilisateur d'autocad), je dois faire des gestions d'erreur partielles à l'intérieur d'une gestion générale par exemple :


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    on erreur goto gestion_erreur
     
    on error resume next
     
    select case err.number
    case 121
    case 3221654
    end select
    err.clear
     
    on erreur goto gestion_erreur
     
    on error resume next
    select case err.number
    case 121
    case 3221654
    end select
    err.clear
     
    on erreur goto gestion_erreur
     
    on error resume next
    select case err.number
    case 121
    case 3221654
    end select
    err.clear
    on erreur goto gestion_erreur
     
    gestion_erreur :
    select case err.number
    case 321
    Debug.Print Err.Number, Err.Description, Err.Source
    case 3516432
    end select
    voilà pour la forme générale... J'en arrive à mon problème : avec une telle structure si j'ai une erreur pas encore gérée comment faire pour savoir sur quelle ligne elle intervient ? Car je peux trouvé le type d'erreur mais pas le lieu... et actuellement je me fait chié à remplacer les "on error goto gestion" par "'on error goto gestion" pour pouvoir savoir ou se trouve l'erreur mais j'aimerais faire ça plus simplement. J'ai lu les aides sur le site mais j'ai pas trouvé de solution. J'ai également tenté l'espion mais dès que j'ai une erreur qui va dans la gestion, l'espion arrête le code au niveau de la gestion mais pas avant...

  2. #2
    Expert éminent sénior

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Points : 20 150
    Points
    20 150
    Par défaut
    bonsoir

    Tu peux numéroter les lignes de code et utiliser la fonction ERL

    http://silkyroad.developpez.com/VBA/GestionErreurs/


    bonne soirée
    michel

  3. #3
    Membre à l'essai
    Profil pro
    Inscrit en
    Novembre 2006
    Messages
    30
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2006
    Messages : 30
    Points : 20
    Points
    20
    Par défaut
    Merci beaucoup, avec ça ça va être plus simple pour vérifier mes erreurs, j'avais lu l'article pour la gestion mais j'avais pas compris compris le but de ce chapitre alors je l'avais survolé... monumentale erreur d'être pressé..

Discussions similaires

  1. Gestion d'erreur avec ShellExecute
    Par mdriesbach dans le forum VB 6 et antérieur
    Réponses: 2
    Dernier message: 22/09/2006, 10h09
  2. [Sybase ASE 12.5.3] Gestion d'erreur avec @@error
    Par lsone dans le forum Sybase
    Réponses: 5
    Dernier message: 24/07/2006, 23h25
  3. [J2EE/JSP] Gestion des erreurs avec une base SQL server 2005
    Par critok dans le forum Servlets/JSP
    Réponses: 3
    Dernier message: 30/04/2006, 17h57
  4. Gestion des erreurs avec setjump/longjump
    Par gege2061 dans le forum C
    Réponses: 1
    Dernier message: 05/02/2006, 16h51
  5. [Upload] Problème pour gestion d'erreur avec class
    Par allserv dans le forum Langage
    Réponses: 2
    Dernier message: 27/12/2005, 14h00

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo