Faire la somme de toute les valeurs contenus dans une colonne d'une listview

fao039 - 21 avril 2021 à 13:13
f894009 Messages postés 17197 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 juillet 2024 - 1 mai 2021 à 08:06
Bonjour,
j'ai une listview de plusieurs colonnes et je voudrais sélectionner une colonne et faire la somme de toutes les valeurs contenus dans cette colonne. pouvez vous m'aider svp?

1 réponse

f894009 Messages postés 17197 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 juillet 2024 2
Modifié le 1 mai 2021 à 08:29
Bonjour,

Adapter le nom de la listview et choix de la colonne

Private Sub Lvw_Base_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
    NCol = ColumnHeader.Index
    With Lvw_Base
        NB = .ListItems.Count
        somme = 0
        For n = 1 To NB
            If IsNumeric(.ListItems(n)) Then
                somme = somme + .ListItems(n)
            End If
        Next n
    End With
    MsgBox "somme: " & somme
End Sub
Rejoignez-nous