Private Sub Form_Load()
With Me.sevGrid1
.DataMode = Mode_List
.AllowEdit = True
.AddItem "test"
'Die Wurzel des Übels:
.LostFocusEditMode = GRID_UPDATEROW
End With
End Sub
Private Sub Command1_Click() 'Standard CmdBtn
'Wenn Zelle im EditMode ist, wird dieses Event nicht ausgeführt!
  Debug.Print "Cmd-Click!"
End Sub
Private Sub roCommand1_Click() 'sevCmd-Btn
'Wenn Zelle im EditMode ist, wird dieses Event ZWEIMAL ausgeführt!
  Debug.Print "sevCmd-Click!"
End Sub