Compter le nombre de lignes d'un résultat de requête

Résolu/Fermé
angelo2night - 18 mars 2013 à 13:04
 DALAF - 24 août 2016 à 14:56
Bonjour,

J'essaie de coder en VBA sous access 2007 une macro qui me permettrait de compter le nombre de lignes d'un résultat de requête.

Je possède un tableau ou j'extrais les informations voulues grâce à une requête et je l'affiche.
Ce que je n'arrive pas c'est de créer un MsgBox qui m'affiche le nombre de lignes.


RecapChantierEffectue : c'est le nom de ma requête me permettant d'afficher les informations voulues

Voici mon code qui s'éxécute suite à un click:

Private Sub Commande0_Click()


Dim cpt As Integer


'Execution de la requête
'DoCmd.OpenQuery "Queryname" ,acReadOnly pour autoriser l'utilisateur à visionner uniquement
DoCmd.OpenQuery "RecapChantierEffectue", acReadOnly

DCount (RecapChantierEffectue)
cpt = DCount

MsgBox ("vous avez effectué au total " &cpt "chantiers")


End Sub


Le Dcount ne fonctionne pas!Please help me!



2 réponses

f894009 Messages postés 16749 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 2 décembre 2022 1 659
18 mars 2013 à 19:28
Bonjour,

ceci devrait aller:

cpt=DCount ("*","RecapChantierEffectue")

Bonne suite
3