Discussion :

[Daniel-Gérald]

Bonjour, je suis un débutant. Voici mon problème. J'aimerais calculer le nombre de valeurs que j'ai dans mon champ Client, et mettre le résultat dans mon champ NB_Client. Mon champ Client est une liste à choix multiple. Voir image ci-dessus.

[hyperion13]

Salut
La fct compte() doit vous permettre d'obtenir le résultat attendu

Code :

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

1
2
SELECT id_cli, Count(lib_cli.Value) As nbClients
FROM tblClient

[Daniel-Gérald]

Ce n'est pas exactement ça. Voici le code vb que j'ai utilisé. Et qui me donne toujours 0 comme résultat.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Client_AfterUpdate()
 
    Dim curTotal As Integer
    Dim varItem As Variant
 
    For Each varItem In Me.Client.ItemsSelected
        curTotal = curTotal + Me.Client.Column(1, varItem)
    Next
 
    Me.NB_Client= curTotal
 
End Sub

[tee_grandbois]

bonsoir,
il y a plus simple:

Code :

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

1
2
3
4
5
Private Sub Client_AfterUpdate()
 
    Me.NB_Client =  Me.Client.ItemsSelected.Count
 
End Sub

[Daniel-Gérald]

Merci.