Sujet Précédent Sujet Suivant

Sommation ,listbox

oussamus -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,
mon petit problem, c'est que je veut faire la sommation "n" élèments d'une listbox de type double et de faire l'affichage de cette somme dans un textbox ou label.
merci d'avoir lire mon message.

1 réponse

Réponse 1 / 1
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
Peut-être avec ceci... 
Sub TotalColonneList()
Dim Tot As String
Dim NumColonne As Integer
NumColonne = 0 ' à changer si pas dans première colonne
    For i = 0 To ListBox1.ListCount - 1
        Tot = Tot + Val(ListBox1.List(i, NumColonne))
    Next i
    Label1.Caption = Tot
    
End Sub

A+
1

Discussions similaires

Creer et remplir un ListBox en VB6 pr un nul
Gegeleblond -
Fanatique VB6 -

12 réponses
[VB 6] Changer l'index d'une ListBox
Kaze_no_i-guru -
Kaze_no_i-guru -

9 réponses
VBA [Excel] Récupérer la donnée d'une listbox dans une formule
Alya -
Alya -

2 réponses
Utilisation de listbox
Obelix1961 -
Obelix1961 -

6 réponses
Trié un listBox
Utilisateur anonyme -
Utilisateur anonyme -

3 réponses