fonction somme dans une listview

[caviard]

bonjour,

je suis débutante en vba et j'aimerais ajouter un code afin de pouvoir faire la somme des montants qui se situe dans la colonne total base de ma listview

merci d'avance ^^

 

[kjin]

Re : fonction somme dans une listview

Bonsoir,

je suis débutante en vba

😱 bé là on est 2... !



...on pourrait pas commencer par simplifier ça ?!
A+
kjin

 

[Guest]

Re : fonction somme dans une listview

Bonsoir,

😱Bé là on est 3...!
Rien compris à l'affaire.🙁 (ou presque😕)

A+

 

[caviard]

Re : fonction somme dans une listview

en faite j'ai crée un moteur de recherche avec une listview et j'aimerais savoir si c'est possible qu'à l'intérieur de celle ci d'ajouter une fonction somme pour additionner les montants recherchés correspondant à total base

désolé si c'est pas tres explicite 😱

 

[forsanta]

Re : fonction somme dans une listview

c'est quelle colonne dont tu veut faire la somme ?

dim T1, T2
T1=0
T2=0

For i = 1 To listview1.ListItems.Count						' ============== boucler de la premiere a la derniere ligne
        
        If listview1.ListItems(i).ListSubItems(2).Text <> "" Then			' ============== colone total
			T1 = T1+ CDbl(listview1.ListItems(i).ListSubItems(2)Text)                      
        Else
			T1 =T1 + 0
        End If
        
        If listview1.ListItems(i).ListSubItems(3).Text <> "" Then			' ============== colone total base
            T2 = T2 + CDbl(listview1.ListItems(i).ListSubItems(3).Text)
        Else
             T2 = T2 + 0
        End If
next i

après tu reporte les totaux la ou tu veut, textbox, listview ou autre

 

[mth]

Re : fonction somme dans une listview

Hi all 🙂 🙂

Et pourquoi pas une vraie base propre sans pollution des sous-totaux (telle qu'elle est sans doute à l'origine ?) , et un simple TCD?

Sourire... peut-être à coté de la plaque vu la demande en VBA, mais au moins c'est simple 🙂

Bon après-midi à tous 🙂

mth

 

[caviard]

Re : fonction somme dans une listview

Hi all 🙂 🙂

Et pourquoi pas une vraie base propre sans pollution des sous-totaux (telle qu'elle est sans doute à l'origine ?) , et un simple TCD?

Sourire... peut-être à coté de la plaque vu la demande en VBA, mais au moins c'est simple 🙂

Bon après-midi à tous 🙂

mth

c'est une bonne idée mais le souci c'est que pour chaque sous total il existe un régime particulier soit du 2 , 3 ,4 ... c'est pourquoi je ne peux pas les faire disparaitre car j'en é besoin pour remplir ma declaration urssaf

 

[caviard]

Re : fonction somme dans une listview

c'est quelle colonne dont tu veut faire la somme ?

dim T1, T2
T1=0
T2=0

For i = 1 To listview1.ListItems.Count						' ============== boucler de la premiere a la derniere ligne
        
        If listview1.ListItems(i).ListSubItems(2).Text <> "" Then			' ============== colone total
			T1 = T1+ CDbl(listview1.ListItems(i).ListSubItems(2)Text)                      
        Else
			T1 =T1 + 0
        End If
        
        If listview1.ListItems(i).ListSubItems(3).Text <> "" Then			' ============== colone total base
            T2 = T2 + CDbl(listview1.ListItems(i).ListSubItems(3).Text)
        Else
             T2 = T2 + 0
        End If
next i

après tu reporte les totaux la ou tu veut, textbox, listview ou autre

merci pr le code 🙂, je voulais savoir ou je le plaçais dans ma macro 😕

 

[mth]

Re : fonction somme dans une listview

re 🙂

Les TCD peuvent très bien faire cela il me semble, mais bon, honneur aux VBAistes alors 🙂

Très bonne soirée à tous 🙂

mth

 

[caviard]

Re : fonction somme dans une listview

merci pr le code 🙂, je voulais savoir ou je le plaçais dans ma macro 😕

est ce que quelq'un peut m'éclairer please , je sais je suis nulle lol