datagridview.cellvaluechanged sur une partie du datagridview

**ozthewizard** · 26/09/2011, 12h34

Bonjour à tous!
alors, voilà, petite question, savez-vous si il est possible de faire un cellvaluechanged sur seulement une partie du datagridview?
et si c'est possible, comment faire?

merci d'avance!

**Gurdil le nain** · 26/09/2011, 15h14

Bonjour,

Cela n'est pas possible de base, tu devras implémenter l'évènement pour toute la datagrid et tester à l'intérieur si la cellule modifiée est dans la colonne que tu souhaites (ou la ligne).

Si par exemple, tu veux une action uniquement si la cellule modifiée est dans la première colonne, cela donnerait:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub dgv_CellValueChanged(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv.CellValueChanged
        If e.ColumnIndex = 0 Then
            'Ton traitement
        End If
End Sub

**ozthewizard** · 26/09/2011, 15h36

Envoyé par Gurdil le nain

Bonjour,

Cela n'est pas possible de base, tu devras implémenter l'évènement pour toute la datagrid et tester à l'intérieur si la cellule modifiée est dans la colonne que tu souhaites (ou la ligne).

Si par exemple, tu veux une action uniquement si la cellule modifiée est dans la première colonne, cela donnerait:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub dgv_CellValueChanged(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv.CellValueChanged
        If e.ColumnIndex = 0 Then
            'Ton traitement
        End If
End Sub

donc il suffit que je rajoute ce code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If e.ColumnIndex = 0 Then

pour lui demander de n'agir qu'en cas de modifs sur cette colonne (suivant l'exemple)... je teste ça de suite, merci!

**ozthewizard** · 26/09/2011, 15h47

merci énormément!
cela fonctionne du tonnerre!!

**ozthewizard** · 26/09/2011, 17h44

euh, juste une question, est-il possible de ne le faire que pour la ligne active? parce que j'ai un fichier de +/- 250 lignes sur 34 colonnes de données à rentrer et c'est plutôt long de faire les calculs sur toutes les lignes à chaque fois (15-20sec sur un cpu E-350...)

mon code:

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
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
Private Sub CellValueChanged(ByVal sender As Object, _
    ByVal e As DataGridViewCellEventArgs) Handles PériodesDataGridView.CellValueChanged
 
        If e.ColumnIndex >= 3 AndAlso e.ColumnIndex <= 36 Then
            'compteur nombre de jours pour moyenne
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
                Dim compt As Double
                For Each cell As DataGridViewCell In row.Cells
                    If cell.ColumnIndex >= 3 AndAlso cell.ColumnIndex <= 36 Then
                        If Not IsDBNull(cell.Value) Then compt += 1
 
                    End If
 
                Next
                row.Cells(46).Value = compt
                compt = 0
 
            Next
            'calcul de la moyenne
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
                Dim total As Double
                For Each cell As DataGridViewCell In row.Cells
                    If cell.ColumnIndex >= 3 AndAlso cell.ColumnIndex <= 36 Then
                        If Not IsDBNull(cell.Value) Then total += cell.Value
                    End If
                Next
                row.Cells(37).Value = total
                row.Cells(38).Value = total / row.Cells(46).Value
                total = 0
 
            Next
            'calcul de l'écart
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
 
                For Each cell As DataGridViewCell In row.Cells
 
                    If IsDBNull(row.Cells(39).Value) Then
 
                        row.Cells(40).Value = 0
 
 
                    Else
                        row.Cells(40).Value = row.Cells(39).Value - row.Cells(37).Value
                    End If
                Next
 
            Next
            'calcul du nombre de jours
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
 
                For Each cell As DataGridViewCell In row.Cells
 
                    If IsDBNull(row.Cells(40).Value) Or IsDBNull(row.Cells(38).Value) Then
                        row.Cells(41).Value = ""
                    Else
                        row.Cells(41).Value = row.Cells(40).Value / row.Cells(38).Value
                    End If
 
                Next
 
            Next
            'pour calcul ok depan
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
 
                For Each cell As DataGridViewCell In row.Cells
 
                    If IsDBNull(row.Cells(40).Value) Then
                        row.Cells(45).Value = "pas de moyenne"
 
                    Else
 
                        row.Cells(45).Value = row.Cells(40).Value - (row.Cells(44).Value * row.Cells(38).Value)
 
                    End If
 
                Next
 
            Next
            'affichage ok, dépannage
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
 
                For Each cell As DataGridViewCell In row.Cells
 
                    If row.Cells(45).Value < 1 Then
                        row.Cells(42).Value = "Dépannage"
 
                        'ElseIf row.Cells(14).Value < TextBox1.Text + 2 And row.Cells(14).Value > TextBox1.Text Then
                        'row.Cells(15).Value = "attention"
                    Else
                        row.Cells(42).Value = "ok"
                    End If
                Next
 
            Next
            'reste
            For Each row As DataGridViewRow In PériodesDataGridView.Rows
 
                For Each cell As DataGridViewCell In row.Cells
 
                    row.Cells(43).Value = (row.Cells(40).Value - (row.Cells(44).Value * row.Cells(38).Value)) / 10
 
                Next
 
            Next
 
        End If
 
    End Sub

**franticfranz** · 26/09/2011, 20h36

Si tu veux mettre à jour le calcul seulement sur la ligne modifiée, travaille avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

e.RowIndex

Remplace

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For Each row As DataGridViewRow In PériodesDataGridView.Rows
   (...)
Next

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
dim  row As DataGridViewRow
row =  PériodesDataGridView.Rows(e.RowIndex)
(...)

Ainsi tu ne traite que la ligne qui a subi une modification.

**ozthewizard** · 27/09/2011, 08h44

merci mais j'ai un petit soucis:

Une erreur s'est produite lors de la création du formulaire. Pour plus d'informations, consultez Exception.InnerException. L'erreur est : L'index était hors limites. Il ne doit pas être négatif et doit être inférieur à la taille de la collection.

mon code ( que j'ai simplifié à une opération pour voir si c'est de là que venait le problème...:

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
    Private Sub CellValueChanged(ByVal sender As Object, _
   ByVal e As DataGridViewCellEventArgs) Handles PériodesDataGridView.CellValueChanged
 
        If e.ColumnIndex >= 3 AndAlso e.ColumnIndex <= 36 Then
            'compteur nombre de jours pour moyenne
            Dim row As DataGridViewRow
            row = PériodesDataGridView.Rows(e.RowIndex)
            Dim compt As Double
            For Each cell As DataGridViewCell In row.Cells
                If cell.ColumnIndex >= 3 AndAlso cell.ColumnIndex <= 36 Then
                    If Not IsDBNull(cell.Value) Then compt += 1
 
                End If
 
            Next
            row.Cells(46).Value = compt
            compt = 0
 
        End If
 
 
 
    End Sub

je pense que le problème vient de e.RowIndex mais je n'arrive pas à savoir pourquoi...

merci!

**Shadam** · 27/09/2011, 08h49

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

PériodesDataGridView(e.ColumnIndex,e.RowIndex)

te donnes même la cellule active

Par contre tu devrais utiliser le nom de tes colonnes pour les identifier plutôt que leur index, parce que si tu décides de mettre une colonne supplémentaire au milieu de ton tableau, à l'index 20 par exemple, tu seras obliger de modifier tout ton code...

Exemple:

change

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
row.Cells(37).Value = total
row.Cells(38).Value = total / row.Cells(46).Value

En:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
row.Cells("nomDeLaColonne37").Value = total
row.Cells("nomDeLaColonne38").Value = total / row.Cells("nomDeLaColonne46").Value

**ozthewizard** · 27/09/2011, 09h07

merci shadam mais cela ne fonctionne pas, je cherche à travailler sur la ligne de la cellule active et avec ton code, c'est uniquement la cellule en cours non?
ou alors il me faudrait un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

row= datagridview.rows(datagridviewindex(e.columnindex, e.rowindex))

...
mais, biensûr, cela ne fonctionne pas
pour le nom au lieu de l'index, c'est vrai que je risque de le regretter si je laisse l'index... merci!

**Shadam** · 27/09/2011, 09h21

Le bout de code que je t'ai mis te montrait juste que tu avais le rowIndex et le columnIndex dans l'évènement (tu l'as d'ailleurs sur quasiment tout les évènements d'un DGV).

Par contre oui je te conseille très vivement de ne pas référencer tes colonnes par leur index mais plutôt par leur prénom sous peine de longues modifications de codes (et je parle d'expérience

), personnellement je le fais dés que c'est possible, sur les datareader par exemple: reader.item("monItem"), puisque dans ce cas là le problème est le même, si des champs sont rajoutés sur les tables en base, au moins en les nommant je suis sûr que mon appli récupérera toujours les bons...

**ozthewizard** · 27/09/2011, 09h22

Envoyé par ozthewizard

merci shadam mais cela ne fonctionne pas, je cherche à travailler sur la ligne de la cellule active et avec ton code, c'est uniquement la cellule en cours non?
ou alors il me faudrait un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

row= datagridview.rows(datagridviewindex(e.columnindex, e.rowindex))

...
mais, biensûr, cela ne fonctionne pas
pour le nom au lieu de l'index, c'est vrai que je risque de le regretter si je laisse l'index... merci!

j'ai fait un test en rajoutant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If e.RowIndex = -1 Then
                Return
            End If

je n'ai plus le message d'erreur mais il ne calcule plus du tout...

**Shadam** · 27/09/2011, 09h48

Return est une instruction de retour pour sortir il faut mettre Exit Sub. Un rowIndex de -1 c'est les columnsHeader...

**ozthewizard** · 27/09/2011, 09h55

corrigé pour le return, pour l'index -1, je savais
mais le message d'erreur me dit que l'index est soit négatif soit supérieur à la collection...
en fait, on dirait qu'il fait le code de cellchanged avant que le form ne se lance, et vu que la BDD est vide, je ne comprends pas pourquoi est ce qu'il me fait une erreur...