SoloCodigo

En este codigo el msflexgrid se llama "Grid" [es para simplificar el codigo] y tiene una fila fija [fixedRows=1].

Private Sub Grid_KeyDown(KeyCode As Integer, Shift As Integer)
With Grid
    If KeyCode = 46 Then 'supr
        If .Rows = 1 Then Exit Sub 'si es la fila fija la seleccionada no hacer nada
        If .Rows = 2 Then 'si son 2 filas eliminamos la 1
            .Rows = 1
            Exit Sub
        End If
        'checamos si hay varios seleccionados
        'sacamos la primera y ultima fila para eliminarlas
        If .Row < .RowSel Then
            mx = .RowSel
            mn = .Row
        Else
            mx = .Row
            mn = .RowSel
        End If
        For S = mn To mx
            If .Rows > 2 Then
                .RemoveItem (mn)
            Else
                .Rows = 1
            End If
        Next
    End If
End With
End Sub

Ojala te sirva de algo...