Gestionnaire d'erreurs

Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Entraide Applications Microsoft Office Access Gestionnaire d'erreurs

3 réponses

Nesta

09/04/2008 à 23:20

Bonjour à tous,

Avec VBA, je souhaite gérer certaines erreurs qui peuvent se produire lors
de l'exécution de mon code.
Voici une partie de mon code :

Sub TheCode()
On Error GoTo GererLerreur

' Tout mon code est ici.

GererLerreur:
MsgBox "Une erreur s'est produite." & (Erreur N°" & Err.Number & ": " &
Err.Description & ")"
Err.Clear

End Sub()

Quand il y a une erreur, elle est effectivement détectée. Mais quand n'y en
a pas aussi !
En fait, il y a un passage systématique dans le gestionnaire d'erreur, avec
le numéro d'erreur : 0.
Pouvez-me dire ce que j'ai mal fait, ou ce que j'ai pas fait ?
Merci d'avance à tous !

Nesta

3 réponses

3stone

10/04/2008 à 00:34

Salut Nesta,

"Nesta"
| Avec VBA, je souhaite gérer certaines erreurs qui peuvent se produire lors
| de l'exécution de mon code.
| Voici une partie de mon code :
|
| Sub TheCode()
| On Error GoTo GererLerreur
|
| ' Tout mon code est ici.
|
|
| GererLerreur:
| MsgBox "Une erreur s'est produite." & (Erreur N°" & Err.Number & ": " &
| Err.Description & ")"
| Err.Clear
|
|
| End Sub()
|
| Quand il y a une erreur, elle est effectivement détectée. Mais quand n'y en
| a pas aussi !
| En fait, il y a un passage systématique dans le gestionnaire d'erreur, avec
| le numéro d'erreur : 0.
| Pouvez-me dire ce que j'ai mal fait, ou ce que j'ai pas fait ?
| Merci d'avance à tous !

Avec l'assistant, crées un simple bouton (pour ouvrir un formulaire par exemple)
et regarde le code ;-)

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
MPFA: http://www.mpfa.info/ (infos générales)

RaphK34

10/04/2008 à 08:47

Salut, juste avant:
GererLerreur:
rajoute un:
Exit Sub

--
@+ Raph.

--------------------------------------------
Merci de répondre sur le NG
Toutes remarques bienvenues !
--------------------------------------------
"Nesta" a écrit dans le message de news:

Bonjour à tous,

Avec VBA, je souhaite gérer certaines erreurs qui peuvent se produire lors
de l'exécution de mon code.
Voici une partie de mon code :

Sub TheCode()
On Error GoTo GererLerreur

' Tout mon code est ici.

GererLerreur:
MsgBox "Une erreur s'est produite." & (Erreur N°" & Err.Number & ": " &
Err.Description & ")"
Err.Clear

End Sub()

Quand il y a une erreur, elle est effectivement détectée. Mais quand n'y
en a pas aussi !
En fait, il y a un passage systématique dans le gestionnaire d'erreur,
avec le numéro d'erreur : 0.
Pouvez-me dire ce que j'ai mal fait, ou ce que j'ai pas fait ?
Merci d'avance à tous !

Nesta

Nesta

10/04/2008 à 17:38

Bonjour Ralph,

Ca marche nickel. Merci !
Et merci aussi à 3Stone (j'avais essayé de voir le code d'un bouton, mais je
n'avais réussi à résoudre mon pb avec ça).

A bientôt

Nesta

"RaphK34" a écrit dans le message de groupe de
discussion :

Salut, juste avant:
GererLerreur:
rajoute un:
Exit Sub

--
@+ Raph.

--------------------------------------------
Merci de répondre sur le NG
Toutes remarques bienvenues !
--------------------------------------------
"Nesta" a écrit dans le message de news:

Bonjour à tous,

Avec VBA, je souhaite gérer certaines erreurs qui peuvent se produire
lors de l'exécution de mon code.
Voici une partie de mon code :

Sub TheCode()
On Error GoTo GererLerreur

' Tout mon code est ici.

GererLerreur:
MsgBox "Une erreur s'est produite." & (Erreur N°" & Err.Number & ": "
& Err.Description & ")"
Err.Clear

End Sub()

Quand il y a une erreur, elle est effectivement détectée. Mais quand n'y
en a pas aussi !
En fait, il y a un passage systématique dans le gestionnaire d'erreur,
avec le numéro d'erreur : 0.
Pouvez-me dire ce que j'ai mal fait, ou ce que j'ai pas fait ?
Merci d'avance à tous !

Nesta

Gestionnaire d'erreurs

3 réponses

Veuillez sélectionner un problème