Discussion :

[stargates]

Bonjour,

Comment tester la valeur d'une cellule d'un datagrid view?
La cellule se trouve dans la colonne 10 et mon champ est de valeur string

Voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Private Sub dgvListeClient_CellEndEdit(ByVal sender as object,.............)
 
Dim Test as String = dgvListeClient.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString()
 
       if Test = "159/1" then 
          label1.BackColor=Color.Gray
       Else
          label1.Backcolor=Color.Red
       end if

Ce code marche mais il marche sur toute les colonnes, je voudrais qu'il marche uniquement sur la colonne10 de mon datagridview

Une idée merci

[guitoux1]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub dgvListeClient_CellEndEdit(ByVal sender as object,.............)
 
If e.ColumnIndex = dgvListeClient.Columns(10).Index Then
 
Dim Test as String = dgvListeClient.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString()
 
       if Test = "159/1" then 
          label1.BackColor=Color.Gray
       Else
          label1.Backcolor=Color.Red
       end if
End If

[stargates]

merci pour ta réponse mais

cela ne fonctionne plus même sur la colonne 10
j'ai même essayé ton code avec colonne 9 et 11 au cas ou
je me serais trompé d'index mais rien n'y fait


une autre idée

[stargates]

Ok fonctionne

En cherchant de mon coté, j'avais changé un bout de code

un grand merci

[guitoux1]

Monter nous ton code qui fonctionne, ça pourras toujours dépanner quelqu'un

[stargates]

voilà le 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
 
 
Private Sub dgvListeClient_CellEndEdit(ByVal sender as object,.............)
 
If e.ColumnIndex = dgvListeClient.Columns(10).Index Then
 
Dim Test as String = dgvListeClient.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString()
 
       if Test = "159/1" then 
          label1.BackColor=Color.Gray
       Else
          label1.Backcolor=Color.Red
       end if
End If