[VBA] Err.Raise : utilisation de vbObjectError

Bonjour,

J'ai un ch'ti soucis avec la méthode raise de l'objet erreur : dans l'aide, ils indiquent que pour définir des numéros d'erreurs perso il faut :

Citation:

---

Entier de type Long identifiant la nature de l'erreur. Les erreurs Visual Basic (qu'elles soient provoquées par Visual Basic ou par l'utilisateur) sont comprises entre 0 et 65535. La plage de 0 à 512 est réservée aux erreurs système ; la plage de 513 à 65535 est disponible pour les erreurs définies par l'utilisateur. Lorsque vous attribuez à la propriété Number votre propre code d'erreur dans un module de classe, vous ajoutez votre numéro de code d'erreur à la constante vbObjectError. Par exemple, pour générer le numéro d'erreur 513, attribuez vbObjectError + 513 à la propriété Number.

---

Or quand je fait cel je me retrouve avec un numéro d'erreur du type -2568615 :?
Quand je vire la constante, je peux définir exactement le numéro désiré.

Est-ce que l'aide access est à l'ouest une fois de plus ou est-ce que je foire quelque part ?

Y a-t'il un risque à définir directement le numéro d'erreur à partir du moment où on prend systématiquement un numéro supérieur à 513 ?

Code:

---

Err.Raise 65000,"Ta Source","Ton Message"

---

génèrera une erreur N° 65000
Avec en description : "Ton Message"
et en source : "Ta Source"

C'est bien ce que je fait, mais j'aimerais comprendre à quoi sert la constante.
(J'suis chiant mais j'aime bien comprendre ce que je fais. :lol: )

C'est juste une invention de Ms pour nous faire nous creuser la cervelle ou il y aune utilité à ce truc ?

F1 dit :

Citation:

---

Const vbObjectError = -2147221504 (&H80040000)
Membre de VBA.Constants

---

D'où vbObjectError + 513 <> 513 contrairement à ce que dit l'aide sur raise.

Bon ben j'abandonne, j'utiliserais err.raise à la hussarde commme d'hab :oops:

Citation:

---

Lorsque vous attribuez à la propriété Number votre propre code d'erreur dans un module de classe

---

en gros ça veut dire : si tu lèves l'erreur depuis un objet externe(contrôle activex, objet d'automation, ...), alors rajoute la constante vbObjectError pour préciser au gestionnaire d'erreurs que c'est une erreur en provenance d'un objet (d'où le nom de la constante)

donc pour une utilisation simple dans Access tu n'en tiens pas compte

D'où les erreurs débiles qu'on obtient parfois ...

Citation:

---

Erreur d'exécution n° '-2770990'
.........

---

Coool, z'ai enfin compris.
Je vais m'endormir moins bête ce soir.

Merci.