Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  ' Tastatur-Navigation im DataGrid
  If Me.ActiveControl Is Grid1 Then
    Select Case KeyCode
        Case vbKeySpace
          If (Shift = 1) And (.IsEditMode Or .IsFilterMode) Then
            KeyCode = 0
          End If
    End Select
  End if
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de