Message d'alerte si une requête renvoit des résultats

Cléoline -  
 Cléoline -
Bonjour,

Je travaille sous Access 2007-2010.

Voilà, j'ai une base de données assez complexe que j'ai récupérée, je ne l'ai pas crée.

Je souhaiterai que à l'ouverture de la base de données, une message d'alerte s'ouvre si une des requêtes renvoie des résultats (requête de relance).

Est-ce que cela est possible ?

Merci d'avance,

Cléoline


A voir également:

1 réponse

benol3 Messages postés 570 Date d'inscription   Statut Membre Dernière intervention   87
 
Salut,

Oui c'est possible par macro.

Alt+F11 Insertion -> Module

Dans le module créé, copie-colle ce code :

Sub AutoExec()

Dim rs As Recordset
Dim qdf As QueryDef

Set qdf = CurrentDb.QueryDefs("lenomdetarequete") 'à adapter
Set rs = qdf.OpenRecordset
    
    If rs.RecordCount > 0 Then
        MsgBox "ton message" 'à adapter
    End If
    
End Sub
0
Cléoline
 
Bonjour,

Merci pour la réponse rapide, mais malheureusement cela ne marche pas...

J'ai copié/collé le texte en remplaçant le nom de la requête, et à l'ouverture de la base de données, rien ne se passe...
0
Cléoline
 
J'ai réussi avec ceci :

http://grenier.self-access.com/access/questions-generales/declencher-une-alerte-avec-access/

Merci pour la réponse!!!

Cordialement,
0