On Error Goto mon_gestionnaire_erreur
C'est désespérant pour mettre au point un module de code !
En VBA (et aussi en VB ancienne mouture ) , on ne peut pas délimiter avec précision le bloc de code susceptible d'engendrer des erreurs .
Par exemple ,quelconque
1 2 3 4 5 6 7 8 9 10 11 12
|
On Error Goto mon_gestionnaire_erreur
Dim quotient as Integer
Dim resultat as Integer
Dim nombre as Integer
Dim rs as Recordset
nombre =10000
quotient=0
resultat=nombre/quotient ' erreur 1 div par zero
Set rs=CurrentDB.OpenRecordset("table_clients")
rs.MoveFirst ' erreur 2 : table_clients contient enregistrements ? |
Comment délimiter :
* ce qui est susceptible de provoquer une division par zero
*un recordset mal initialisé
Je sais vous allez me donner 1000 réponses m'affirmant que c'est possible, que je suis un incompétent .
Mais il faut avouer que c'est au prix d'un certain "bricolage" !
Partager