bonjour à tous
je plante sur le probleme suivant
j'ai une colonne (la clonne J) qui contient des nombres issus de calcul de somme et cela de la ligne 3 à 1500 lignes .
ex : 45,78,52,60,14,........

objectif
pour chaque nombre , je cherche à savoir si le nombre suivant lui sera superieure, inferieur ou egale et combien de fois cela s'est produit .

ex pour le chiffre 15
1) savoir combien de fois il est present dans ma colonne J
2) savoir conbien de lfois le chiffre 15 a eu un nb suivant qu'il lui a ete superieur
3)savoir combine de fois le chifrre 15 a eu de nb suivant qu'il lui à ete inferieur
4)savoir combine de fois le chifrre 15 a eu de nb suivant qu'il lui à ete inferieur



pour faire cela je suis parti avec un tableau à dimensions multiple mais je me suis perdu


voici mon code de depart
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
Private Sub CommandButton1_Click()
'definin le tableausomme(S-1,nb defois que la val S-1 a ete trouve, test S-1>S0, testS-1>S0, terst S-1=S0)
Dim tableausomme(90, 200, 200, 200, 200) As Integer
Dim test1, test2, test3 As Integer
Dim sommemoins1, somme0 As Integer
'lire la feuil1 colonne J a partir de la ligne 2 jusqu'a la ligne 1500
'pour chaque valeur trouvée remplir le tableausomme
For ligne = 3 To 1500
 
     sommemoins1 = Feuil1.Cells(ligne - 1, 10)
     somme0 = Feuil1.Cells(ligne, 10)
     occurencesommecoursemois1
     If sommemoins1 > somme0 Then test1 = 1 Else test1 = 0 'test si somme-1 >somme0
     If sommemoins1 < somme0 Then test2 = 1 Else test2 = 0 'test si somme-1< somme0
     If sommemoins1 = somme0 Then test3 = 1 Else test3 = 0 'test si somme-1=soemme0
 
 
 
     tableausomme(sommesemoins1, 0, test1, test2, test3) = tableausomme(sommemoins1, 0, test1, test2, test3) + 1
 
 
Next ligne
 
'lecture du tableau somme pour chaque somme et'ecrire le resultat dans le textbox1
'ex: pour la somme X  s'est presenté y fois , la somme suivante a ete superieure W fois, inferieur S fois  et egale Z fois
soit
'pour la somme 45 s'est presente 35 fois , la somme suivante a ete superieure 28 fois, inferieure 4 fois et egale 3 fois
 
 
 
End Sub

c'est à lecture de mon tableau que je plante

merci de votre aide