Msflexgrid

Résolu
mephisto25 Messages postés 6 Date d'inscription mercredi 5 octobre 2005 Statut Membre Dernière intervention 24 août 2010 - 1 févr. 2008 à 22:23
mephisto25 Messages postés 6 Date d'inscription mercredi 5 octobre 2005 Statut Membre Dernière intervention 24 août 2010 - 2 févr. 2008 à 20:58
Bon, un problème de débutant... J'ai un tableau flexgrid avec des colonnes de données, et je voudrais faire le total des colonnes sur la dernière ligne. Merci de votre aide !

2 réponses

BLUEBIBUBBLE Messages postés 116 Date d'inscription samedi 4 juin 2005 Statut Membre Dernière intervention 10 avril 2013 1
2 févr. 2008 à 05:25
Quelque chose un peu comme ça ?

    Dim total As Single
    
    For i = 0 To MSFlexGrid1.Cols - 1   ' pour chaque colonne...
        total = 0
        For j = 0 To MSFlexGrid1.Rows - 2  ' pour chaque ligne...
            total = total + Val(MSFlexGrid1.TextMatrix(j, i))
        Next j
        MSFlexGrid1.TextMatrix(j, i) = total
    Next i
3
mephisto25 Messages postés 6 Date d'inscription mercredi 5 octobre 2005 Statut Membre Dernière intervention 24 août 2010
2 févr. 2008 à 20:58
Le temps d'adapter to code à mon appli, et ça devrait finir par coller. Merci, BlueBiBubble !
3
Rejoignez-nous