hi molema, try this

Code:
Private Sub MSFlexGrid1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = vbRightButton Then MSFlexGrid1.Row = MSFlexGrid1.MouseRow
End Sub
hope this does it for you