Discussion :

[irimi54]

Bonjour à tous

Dans access 2019 je voudrais dans une macro lancer une requete et ensuite lancer un formulaire. facile !
Mais si la requete me retourne enu erreur (par exemple aucun enregistrement trouvé) je voudrais que s'affiche un message et sortir de la macro pour ne pas lancer le formulaire.

Je ne vois pas comment faire cae si je mets "Arret macro" apres le "SurErreur" mon formulaire ne se lance pas meme si la requete trouve un enregistrement.

Merci de vos conseils

[User]

Bonjour,

Le surErreur devrait-être placé en premier dans la macro, selon cette structure :



avec à la fin un message si une erreur a été déclenchée.

Cdlt,

[irimi54]

OK je vais essayer cela

merci

[irimi54]

Je reviens vers toi

j'ai fais les modification mais cela ne fonctionne pas comme voulu.

quand l'erreur se produit, le message d'erreur d'access n'apparait pas mais mon message non plus et le formulaire apparait tout de meme mais le contenu est vide puisque la requete ne donne pas de resultat

[User]

Je me demande si c'est réellement un message d'erreur, ou simplement un message d'alerte.

Dans le cas d'un message d'alerte il est normal qu'il ne récupère pas d'erreur.

Je vous proposerais alors de mettre ce code sur ouverture de votre formulaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Form_Open(Cancel As Integer)
 
    If Me.Recordset.RecordCount = 0 Then ' si pas d'enregistrement dans la source du formulaire
        Cancel = True ' alors annule l'ouverture du formulaire
    End If
 
End Sub

Cdlt,

[irimi54]

ok je vais essayer.
donc dans les proprietes du formulaire
je vais lancer une commande sur l'ouverture du formulaire.

[User]

Il faudrait mettre le code que je vous ai donné sur l'événement Ouverture de votre formulaire :

[irimi54]

Et voila, cela fonctionne bien

Mille merci

[User]

Tant mieux !

je ne crois pas qu'on puisse faire le tout dans une macro, il faut donc utiliser le VBA pour cette partie.

Cdlt,