Bonsoir mon code ici me permet sur un datagridview qui contient 15 colonnes et 8 lignes de parcourir chaque cellules si dans une cellules il y a une valeur positive une opération de décrémentation (-1) et d’incrémentation(+1) des colonnes s'amorce sur chaque ligne qui a leurs tours les lignes sont décrémenter de (-1) jusqu'a la première ligne en me donnant une valeur qui doit être la somme des toutes les cellules concernées dans la variable total.
Mon problème est que je veux retenir la plus grande valeur de toutes les valeurs que prendra la variable somme déjà déclarer...
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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71 'la boucle parcourant toutes les lignes For i = 0 To ligne - 1 ' la boucle parcourant toutes les colonnes For j = 1 To colonne valeur = Integer.Parse(donneeconeflotant.Rows(i).Cells("C" + j.ToString).Value.ToString) If valeur > 0 Then vc = j vl = i v = 0 total = 0 For k = vl To 0 Step -1 ' la boucle qui va parcourir toutes fles lignes concerné limgauche = j - v limdroit = j + v For z = limgauche To limdroit If z <= 0 Or z > colonne Then Else value = donneeconeflotant.Rows(k).Cells("C" + z.ToString).Value total = total + value End If Next v = v + 1 Next total = total + valeur ' verifier si le total est positif alors on colorier toutes les cellules concernées If total > 0 Then somme = somme + total vc = j vl = i v = 0 donneeconeflotant.Rows(i).Cells("C" + j.ToString).Style.BackColor = Color.Green For k = vl To 0 Step -1 ' la boucle qui va parcourir toutes fles lignes concerné limgauche = j - v limdroit = j + v For z = limgauche To limdroit donneeconeflotant.Rows(i).Cells("C" + j.ToString).Style.BackColor = Color.Green If z <= 0 Or z > colonne Then Else donneeconeflotant.Rows(k).Cells("C" + z.ToString).Style.BackColor = Color.Green End If Next v = v + 1 Next End If Else End If Next Next
cordialement!
Partager