Bonsoir,
une erreur aléatoire qui se produit au cours de l'exécution du projet au niveau de la deuxième ligne du datagrid.
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
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
If DataGrid1.Row <> RowColChange Then
T1.Text = DataGrid1.Columns(0).Text
T2.Text = DataGrid1.Columns(1).Text
T3.Text = DataGrid1.Columns(2).Text
T4.Text = DataGrid1.Columns(3).Text
T5.Text = DataGrid1.Columns(4).Text
T6.Text = DataGrid1.Columns(5).Text
T7.Text = DataGrid1.Columns(7).Text
T8.Text = DataGrid1.Columns(8).Text
C1.Text = DataGrid1.Columns(6).Text
list1.Text = DataGrid1.Columns(8).Text
list2.Text = DataGrid1.Columns(4).Text
list3.Text = DataGrid1.Columns(7).Text
End If
End Sub
merci de m'aider à surmonter cet obstacle,je suis arrache les cheveux
salutations