IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

calculer la somme à partir d'une listbox [AC-2003]


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Juin 2006
    Messages
    106
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 106
    Par défaut calculer la somme à partir d'une listbox
    Salut,

    Veuillez svp m'indiquer si c'est possible de calculer la somme d'une colonne faisant partie d'une listbox.
    NB; les données de la liste proviennent d'une requête en code vba.

    J'ai essaye quelque chose comme ca:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    txt = dsum ("champ", me.liste.column (1))
    Même comme ca :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    dsum (me.maliste.column (1))
    Mais ca marche pas

    Merci de m'éclaircir

  2. #2
    Membre Expert
    Avatar de FreeAccess
    Homme Profil pro
    Un monde ou prendre est plus facile qu'apprendre.
    Inscrit en
    Mars 2006
    Messages
    2 745
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Un monde ou prendre est plus facile qu'apprendre.

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 745
    Par défaut
    Bonjour,

    En t'inspirant des diverses solutions proposées par la ...

    ** Comment connaître le nombre de ligne d'une zone de liste ?
    ** Sélectionner tous les éléments zone de liste en VBA ?

    ...je mélange tout cela et je l'adapte à mon problème....

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Private Sub Form_Open(Cancel As Integer)
    Dim var As Integer
    Dim i As Long
    'Ici je boucle sur toutes les ligne contenu dans la ZdL
    For i = 0 To Me.Liste0.ListCount - 1
        'Ici j'additionne les différentes valeurs de la 
        'deuxième colonne de la ZdL
        var = var + Me.Liste0.Column(1, i)
    Next i
    'Ici, la zone de texte affichera la somme totale
    Me.Texte2.Value = var
    End Sub
    Ceci est une solution. Maintenant il serait peut-être plus simple de calculer cette somme directement dans ta requête

    A tester.....

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [AC-2007] calcul d'une somme à partir d'une listbox
    Par l.lakrakbi dans le forum IHM
    Réponses: 2
    Dernier message: 17/06/2009, 11h18
  2. Réponses: 4
    Dernier message: 10/07/2006, 11h22
  3. Photo à partir d'une listbox dans formulaire
    Par alex.a dans le forum IHM
    Réponses: 17
    Dernier message: 17/05/2006, 09h50
  4. [VBA-A]récuperation de champs à partir d'une listbox
    Par jouf dans le forum VBA Access
    Réponses: 10
    Dernier message: 05/04/2006, 15h43
  5. Réponses: 5
    Dernier message: 05/04/2006, 12h23

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo