Access Requete

[malinsard]

Bonjour, dans une BDD j'ai une requête qui affiche dans un état les données en fonction de l'année demandé.
Ma question comment faire pour afficher un message si aucune données pour l'années demandé.
Merci à tous.

 

[Gégé-45550]

Bonjour,
en supposant que chemin_bd contienne le chemin complet d'accès à votre BDD, que les variables chemin_bd, base et enr aient bien été déclarées, que la méthode d'ouverture de la base soit équivalente à celle ci-dessous (sinon les deux premières lignes seront différentes mais c'est sans importance, c'est la dernière ligne qui répond à votre question).

Set base = DBEngine.OpenDatabase(chemin_bd)
Set enr = base.OpenRecordset("SELECT * FROM " & MaTable & Critere, dbOpenDynaset)
if enr = vbNullString Then MsgBox "Aucun enregistrement trouvé", "Recherche dans la base",vbOkOnly

Bonne journée

 

[malinsard]

Merci super!