Private Sub Grid2_RowLoaded(ByVal nRow As Long, Item As sevDataGrid2.ListItem)
    With Item
        fFakt.Grid2.Columns(1).Visible = False             '<= das ist die 
        ' id-Spalte
 
        ......
 
        If .CellText("id") = sID Then lRowGewählt = nRow  '<= sollte die 
        ' Row-Nummer bereitstellen
 
        DoEvents
    End With
-----------------
Hier noch 2 Codeschnipsel, die relevant sein könnten, sie merken sich die _
  entsprechende 'id':
        With fFakt.Grid2 'Editieren
            sID = .Recordset.Fields("id").Value  'liest die id aus dem Recordset
-----------------
    Else    'Neu
        sID = myGUID.CreateID  '<= erstellt eine neue id
-----------------