Discussion :

[rag83]

Bonjour à tous,

J'ai une question qui a peut-être déjà traitée, malheureusement je n'ai rien trouvé que j'arrive a faire fonctionner.
Je voudrais compter le nombre de valeurs différentes dans un champ d'une requête avec CpteDom mais pas moyen, chaque fois je me retrouve avec le nombre total d’enregistrements.
Quelque chose du genre:

Code :

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

=CpteDom(disctinct [monChamp];"maRequete")

Est-ce qu'il existe un moyen de faire ça ?

Merci

[User]

Bonjour,

Il faut d'abord créer une autre requête "maRequete2" avec un distinct sur le champ en question :

Code sql :

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

1
2
select distinct nomchamp
from maRequete;

Puis utiliser CpteDom avec cette dernière requête

Code :

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

=CpteDom("monChamp";"maRequete2")

Cdlt,

[rag83]

Bonjour User,

Je te remercie, ça fonctionne. Par contre qu'est ce que c'est lent, à l'ouverture du formulaire il doit bien falloir 10 sec pour que le chiffre apparaisse, alors que dans l'état c'est instantané

Quelle pourrait être la raison ?

[User]

Hello,

Oui il y a aussi la possibilité d'affecter le résultat par exemple sur ouverture du formulaire, en utilisant du code VBA :

Code :

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

Me.Texte1.value=DCount("monChamp","maRequete2")

Ou encore de passer par une requête :

Code sql :

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

1
2
select Count(nomchamp)
from maRequete2;

Cette requête pourrait-être la source d'un recordset...

Cdlt,

[rag83]

Et bien c'est parfait.

J'utilise donc ça

Code :

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

Me.Texte1.value=DCount("monChamp","maRequete2")

mais comme j'ai un besoin de faire un requery sur le formulaire quand je rentre divers critères de recherche et que je ne sais pas si je peux juste rafraichir le contrôle, je réexécute cette ligne de code a chaque fois. Et tous cas c'est beaucoup plus rapide qu'avant, merci User.