[Ayudar]Eliminar una fila de msflexgrid y en Access

[SalomonSab]

Una forma de Eliminar los Registros de un Flex es como esta:

Código:

If MsFlexBancos.Row = 0 Then
        MsgBox "No hay ningún registro para eliminar", vbInformation
        Exit Sub
    End If
        
    With MsFlexBancos
        ' pregunta
        If MsgBox("Se va a eliminar el registro : " & vbNewLine & _
                 String(60, "-") & vbNewLine & _
                 "Id Bancos:     " & .TextMatrix(.Row, 0) & vbNewLine & _
                 "Nombre:         " & .TextMatrix(.Row, 1) & vbNewLine & _
                  String(60, "-"), _
                 vbExclamation + vbYesNo, "Eliminar Registros") = vbYes Then
            
            ' Elimina
            cnn.Execute "DELETE FROM Tbl_Bancos WHERE IdBancos = '" & .Text & "'"
            ' vuelve a cargar los datos en el flexgrid
            If rs.State = adStateOpen Then rs.Close
            rs.Open "SELECT * FROM Tbl_Bancos ORDER BY IdBancos", cnn, adOpenStatic, adLockOptimistic
            Call Llenar_MsFlexGrid(rs, Me.MsFlexBancos)
            Call Bancos_Listados(MsFlexBancos)

        End If
    End With

Obviamente tendras que adaptarlo a tus necesidades cambiando los nombres del flex asi com la conexión y los registros

Espero aberte ayudado...