ddove53
Messages postés623Date d'inscriptionmardi 20 mars 2007StatutMembreDernière intervention15 juin 2010
-
11 juil. 2008 à 12:27
ddove53
Messages postés623Date d'inscriptionmardi 20 mars 2007StatutMembreDernière intervention15 juin 2010
-
11 juil. 2008 à 15:39
Le code suivant me donne la valeur de la cellule.
Me.vaSpread1.GetText Col, Row, test1
Comment je peux faire pour additionner les valeurs des cellules avant jusqu'à cette cellule.
Me.label.Caption = test1
ddove53
Messages postés623Date d'inscriptionmardi 20 mars 2007StatutMembreDernière intervention15 juin 2010 11 juil. 2008 à 13:49
J'ai fait comme suit pour qu'il me fasse l'addition des valeurs de lma cellule mais ça marche pas.Voyez-vous ce qui cloche?
Me.vaSpread1.GetText Col, Row, test1
nVal1 = test1
For i = 3 To vaSpread1.Col
Me.vaSpread1.GetText i, Row, test1
nVal1 = nVal1 + test1
Next i
Me.Label.Caption = nVal1
ddove53
Messages postés623Date d'inscriptionmardi 20 mars 2007StatutMembreDernière intervention15 juin 2010 11 juil. 2008 à 14:05
c bon j'ai trouvé:
Me.vaSpread1.GetText 3, Row, test1
nVal1 = test1
For i = 3 To Col
Me.vaSpread1.GetText i, Row, test1
nVal1 = nVal1 + test1
Next i
Me.Label.Caption = nVal1
ddove53
Messages postés623Date d'inscriptionmardi 20 mars 2007StatutMembreDernière intervention15 juin 2010 11 juil. 2008 à 15:24
Me.vaSpread1.GetText 2, vaSpread1.ActiveRow, zVal
nVal = zVal
'Colonne 2 - somme des cellules de la ligne avant cellule active
For i = 3 To vaSpread1.ActiveCol - 1
Me.vaSpread1.GetText i, Me.vaSpread1.ActiveRow, zVal
nVal = nVal - zVal
Next i
Me.Label1.Caption = nVal
'Somme des cellules - somme des cellules de la ligne avant cellule active
Me.vaSpread2.GetText 3, Row, zVal1
nVal1 = zVal1
For k = 4 To Col
Me.vaSpread2.GetText k, Row, zVal1
nVal1 = nVal1 + zVal1
Next k
Me.Label2.Caption = (nVal1 - zVal)
Mon probléme c'est au niveau du résultat que j'affiche dans le label2. J'ai pas le bon résultat car je voudrai qu'il m'affiche le résultat de nVal1( dans la première boucle)-zVal1(dans la deuxième boucle). Faut-il imbriqué les boucles? Pouvez-vous m'aider?