Discussion :

[Leehan]

bonjour,

dans un sous formulaire ou (dans la table correspondante ?), je voudrais compter le nombre de cases à cocher (booléen) qui sont effectivement cochées. J ai cherché sur le forum apres avoir vainement essayé. Echec
pouvez vous m aider svp ?
D avance merci.

PS : vaut il mieux travailler sur les formulaires ou sur les tables lorsqu'on fait des calculs ?

[Arkham46]

PS : vaut il mieux travailler sur les formulaires ou sur les tables lorsqu'on fait des calculs ?

Je sais pas...
C'est peut-être plus performant de chercher directement sur les données de la table, mais parfois c'est pas facile de retrouver la source des données du formulaire, les filtres,...
Et si les calculs sont trop complexes il est plus simple de parcourir le formulaire que de tenter de faire une requête tarabiscotée.

alors sur le formulaire :

Code :

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

1
2
3
4
5
6
7
8
9
Dim lCpt As Integer
    If RecordsetClone.RecordCount > 0 Then
        RecordsetClone.MoveFirst
        While Not RecordsetClone.EOF
            If RecordsetClone!TonChampCase = True Then lCpt = lCpt + 1
            RecordsetClone.MoveNext
        Wend
    End If
    MsgBox lCpt

ou bien si tu préfères sur la source des données :
- uniquement si la source est une table ou une requête, ça ne marche pas avec du SQL dans la source
- et s'il y a un paramètre dans ta requête il va t'ouvrir une boîte de dialogue te demandant de renseigner le paramètre...

Code :

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

MsgBox DCount("*", Me.RecordSource, IIf(FilterOn, Me.Filter, "1=1") & " and TonChampCase = true")

Dans les 2 cas on ne compte que les cases à cocher non filtrées dans le formulaire.
A prendre avec des pincettes, c'est vite fait, j'ai pas trop beaucoup testé.

[Leehan]

merci de ton aide et de ton attention.
Mais je ne suis pas du tout versé dans le codage..mais alors pas du tout
Mes competences sont vraiment tres limitées voire inexistantes ds le domaine. Je vais tacher de reflechir a quelque chose de plus...simple que la case à cocher. Peut etre un simple oui ou non..je ne sais pas trop...
Merci encore

[Heureux-oli]

Peut-être avec un simple requête ou l'on affiche les calculs.
Faire un count des enregistrements où la valeur est soit 1 soit 0, oui / non, yes /no....

[Arkham46]

Mais je ne suis pas du tout versé dans le codage..mais alors pas du tout

parfois on a pas le choix, ou alors il faut se passer de la fonctionnalité...

Je vais tacher de reflechir a quelque chose de plus...simple que la case à cocher. Peut etre un simple oui ou non..

En quoi oui/non est-il plus simple que vrai/faux??

[nykola7]

Salut

Je te conseille d'utiliser une requete, de passer en mode SQL et copier ceci:


Si tu veux que la requete compte le nombre d'enregistrement de ta table:

SELECT Count(Nomtable.Nomchamp) AS Compte
FROM Nomtable;

Ou si tu veux que la requete te compte le nombre d'neregistrement de ta table quand la case à coher est activé:

Select Sum(IIf(Nomchamp=True,1)) as Compte from Nomtable;

Bon courage
A+

[Tofalu]

Pour compter le nombre de case à cocher (champ par exemple nommé lechamp), dans une zone de texte placer la source :

Code :

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

=Somme([LeChamp])*-1

[Arkham46]

Pour compter le nombre de case à cocher (champ par exemple nommé lechamp), dans une zone de texte placer la source :

Code :

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

=Somme([LeChamp])*-1

c'est sûr pour un calcul simple comme ça c'est mieux que mon code quand même...