Comment grouper [Résolu]

Signaler
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
-
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
-
Bonjour si je fait
Set db = OpenDatabase(App.Path & "\cloture.mdb")
toto = Mid(File1, 4, 5)
Set rs = db.OpenRecordset("select SUM(vat.total_hors_tva) As titi FROM VAT WHERE VAT.num_periode='" & toto & "' group by num_dep")

si je regroupe comme ceci = group by num_dep
et que dans mon num_dep j'ai
11,12,13,14,15
et dans num_periode j'ai toto = 04700 c'est le toto dans la requete
il me donne toujour le total qui corespond a 11
comment faire pour avoir les autre ??
msgbox = rs!titi (il me donne le total pour le 11)


Merci

2 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
70
Salut
Je te l'ai déjà dit : Il faut parcourir les résultats de ton RecordSet.
Lire rs!titi seulement ne donne qu'une des réponses stockée dans le rs.
Il te suffit de lire n'importe quelle source qui traite les RecordSet pour apprendre comment faire : lire le rs.RecordCount + faire une boucle Do-Loop et jouer avec .MoveNext ...

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
1
Bonjour Jack et merci
j' ai bien compris ce que tu me dit
mais quand
Set rs = db.OpenRecordset("select SUM(vat.total_hors_tva) As titi FROM VAT WHERE VAT.num_periode='" & toto & "' group by num_dep")

If IsNull(rs!titi) Then
Exit Sub
Else
On Error GoTo vide
 Do While Not rs.EOF
List1.AddItem rs!titi' ici sort le resultat ok, mais d'ou vienne t'il, comment savoir si il sont du 11,12,13,14????
        rs.MoveNext
    Loop