Recherche:

Salut

Personnellement, je ne comprends pas l'utilité de la boucle For Next... J'ai fait ceci qui marche très bien:

Private Sub flex_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn...

Salut

Ce doit être une question de préférences dans le système... Chez moi, ton code ne fait qu'agrandir la sélection vers le bas... Est-ce bien ce que tu cherches à faire?

Salut


Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
MSFlexGrid1.Row = MSFlexGrid1.RowSel + 1
End If
End Sub