Discussion :

[fadwa]

je veux afficher des données listées dans une datagrid dans des zones de textes lors du click sur une ligne de la datagrid(les données qui seront afficher sont celles de la ligne sur laquelle s'effectue le click)
merci c urgent

[Vesta]

Code :

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

1
2
3
4
5
6
Private Sub DBGrid1_SelChange(Cancel As Integer)
  Dim i As Variant
  For Each i In DBGrid1.SelBookmarks
    TextColumn4.text = DBGrid1.SelBookmarks(i - 1), DBGrid1.Columns(4).Value
  Next i
End Sub

[Vesta]

Fais ca avec ca alors...

Code :

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

1
2
3
4
 
Private Sub DBGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Text1.Text = DBGrid1.Columns(2).Value
End Sub