[Resolvido]Seleção de perfil não esta atualizando no usuário correto

Bom dia

Estou tendo problemas no formulário de permissão de acesso, ao selecionar na caixa de seleção o usuário que pretendo aplicar o perfil de acesso a seleção dos acessos não esta indo para o usuário correto.

Poderiam me ajudar, estou postando o banco para facilitar o entendimento do problema.

Desde já agradeço a ajuda.

Amigo, deverá realizar uma pesquisa e mover para o registro selecionado...

Para isto utilize o Método FindFirst.


Veja como Ficou:


Coloque no Evento apos Atualizar do Campo txtGrupo.

Código:

Private Sub TxtGrupo_AfterUpdate()
'-------------------------------------------------------------'
'                    Criado por Fabio Paes                  '
'                                                            '
'                Em 23/11/2016 para o MaximoAccess          '
'                                                            '
'-------------------------------------------------------------'
Dim F As String
Dim rs As Recordset
   
    F = "Login = '" & Me.TxtGrupo & "'" 'Controi o Filtro no Campo Login
    Set rs = Me.SFrm_Permissao.Form.RecordsetClone 'Clona a Fonte de Dados do Subformulario (SFrm_Permissao) para realizar a pesquisa
    rs.FindFirst F 'Realiza a Pesquisa com FindFirst
    If Not rs.EOF Then Me.SFrm_Permissao.Form.Bookmark = rs.Bookmark 'Move o Subformulario para o Registro filtrado, se localizar!
 
End Sub

Por favor, acompanhe os comentários para aprender como deve ser feito.

Fábio

Entendido como funciona, já inseri e esta funcionando perfeitamente

Obrigado pela ajuda mais uma vez

Grato pelo retorno! Até a próxima se Deus quiser!