Somme a partir une liste à choix multiple

Résolu
Bonjour,

J'airai besoin de vos lumières cher ami. Je vous explique mon souci.

Dans un formulaire, j'ai une liste à choix multiples reprenant des références reprit d'une requête. Dans une colonne liée il y a une somme pour chaque référence.

j'aimerai que dans un champ (Somme), il me donne le montant pour le choix sélectionné et si plusieurs référence sont sélectionné qu'il me donne la somme total des sélection.

je demande la somme([ListeReference].Column(1)) mais mon champ reste vide

Quelqu'un aurai une idée de comment puis-je obtenir le résultat souhaité ?

Merci d'avance

2 réponses

  1. Contributeur Ambassadeur
    bonsoir, je pense que cela requiert un petit code VBA qui agirait chaque fois que la liste est modifiée.
    exemple:
    Private Sub ListeReference_AfterUpdate()
    
        Dim curTotal As Currency
        Dim varItem As Variant
        
        For Each varItem In Me!ListeReference.ItemsSelected
            curTotal = curTotal + Me!ListeReference.Column(1, varItem)
        Next
        
        Me!Somme = curTotal
        
    End Sub
    1
    1. Je te remercie, je vais essayer ça, malgré que je ne suis pas très douée avec le VBA
      0
    2. Il a un petit souci avec le passage

      curTotal = curTotal + Me!ListeReference.Column(1, varItem)

      Il me la souligne pour faire savoir qu'il a une erreur (d'écriture surement) mais je ne la voit pas. une idée ?
      0
    3. Contributeur Ambassadeur
      @Lucasineje ne suis pas habitué à ce qu'Access souligne du code VBA: es-tu bien dans l'éditeur de code VBA? quelle version de Access?
      0
    4. Oui oui, je suis bien en VBA.

      Quand je vais en mode formulaire et que j'essai, il me met un message ;
      Erreur d'exécution '13' :
      Incompatibilité de type

      2 choix : Fin ou débogage

      Quand je fait débogage, il m'ouvre le code VBA est me surligne en jaune la partie suivante :

      curTotal = curTotal + Me!ListeReference.Column(1, varItem)
      0
    5. @LucasineBonjour
      Normalement on ne met pas inscrire le resultat d' un calcul dans une table.
      On peut le faire dans un formulaire ou un etat
      0
  2. Écris le début de la formule =SOMME(
    Ensuite sélectionne les cellules que tu veux calculer.
    Enter.

    C’est ce que tu voulais ?

    --
    0