Comment interdire les messages Access en VBA

bonsoir,

Comment bloquer dans un code VBA les messages d'Access ?
éventuellement au profit d'un personnalisé.
Si vous avez un exemple.
Merci. :?

Bonjour

Peux-tu indiquer le type de messages car il sont nombreux. Messages d'erreurs ? Messages de mise à jour de requêtes ?

En attendant un peu de FAQ : http://access.developpez.com/faq/?page=SQL#Warning

Cette FAQ est à lire sans modération.

Philippe

Bonjour,
Ce message est en complément de celui que j'ai posté plus bas.

Avec ce code on vérifie qu'il y a pas de doublon, ça fonctionne bien si le formulaire est unique, mais s'il est en mode feuille de données je reçois le message suivant.

Code:

---

1 2 3 4 5 6 7

Private Sub National_BeforeUpdate(Cancel As Integer) If Not IsNull(Dlookup("[IDNAT]", "MesAnimaux", "[IDNAT]='" & Me.National & "'")) Then MsgBox "Cet animal existe déjà.", , "Saisie d'un doublon" Me.Undo Cancel = True End If End Sub

---

"Aucun enregistrement en cours"
je pense que l'on doit pouvoir réaliser la même chose dans un formulaire unique et en mode feuille de données ?

En fait il faudrait enregistrer l'enregistrement avant si j'ai bien compris.

Merci pour votre aide, je ne suis pro dans ce domaine. ;)

Bonjour,

J'ai retesté ton code dans une base vide et elle fonctionne sans message d'erreur.

Peut-être devrais-tu créer une nouvelle base et tester le code.

Je sais que j'ai déjà eu le problème d'erreur dans une base et en créant une nouvelle base, le code fonctionnait.

Bonne journée

Merci domibigoudi, ça fonctionne même en mode feuille de données ?
En sous formulaire ?

J'ai également retesté dans une nouvelle base, le code fonctionne mais lorsque le processus est terminé j'ai toujours une boite qui me dit :

Aucun enregistrement en cours, avec un triangle jaune "attention"
je n'arrive pas à comprendre ce qui se passe, en mode unique je n'ai pas ce problème
Merci.