MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

2 participantes

    [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário

    avatar
    lf0029
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 19/07/2011

    [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário Empty [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário

    Mensagem  lf0029 12/5/2021, 14:06

    Bom dia, Pessoal!

    Estou com um problema e não consigo resolver...entendo pouco de Access. Tenho um caixa de listagem onde quero capturar os dados de uma linha e jogar em outro formulário. Está dando certo até que chego nos dados que estão em uma caixa de combinação. Aí da erro. Lembrando que nada é acoplado a tabelas.
    Na tabela o dado da caixa de combinação é numérico.

    Private Sub CxlstPesqUsuario_DblClick(Cancel As Integer)
    For Each VarItem In Me.CxlstPesqUsuario.ItemsSelected
       VarIDUsuario = Me.CxlstPesqUsuario.Column(0, VarItem)
       BuscarDadosUsuario
    Next VarItem
    End Sub

    Private Sub BuscarDadosUsuario()
    DoCmd.OpenForm "FrmManuteUsuarios"
    Form_FrmManuteUsuarios.TxtNomeUsuario = DLookup("[NomeUsuario]", "TabUsuario", "[IDUsuario]= " & VarIDUsuario)
    Form_FrmManuteUsuarios.TxtLoginUsuario = DLookup("[LoginUsuario]", "TabUsuario", "[IDUsuario]= " & VarIDUsuario)


    'Nesta linha de baixo dá erro
    Form_FrmManuteUsuarios.QuadroGrupoUsuario.Value = DLookup("[IDGrupoUsuario]", "TabUsuario", "[IDUsuario]= " & VarIDUsuario)


    End Sub

    Private Sub Form_Load()
    Conexao
    CarregarListaUsuarios
    End Sub

    Private Sub CarregarListaUsuarios()
       Me.CxlstPesqUsuario.RowSource = "SELECT * FROM CstListaUsuarios"
    End Sub
    avatar
    lf0029
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 19/07/2011

    [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário Empty Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário

    Mensagem  lf0029 13/5/2021, 14:46

    Bom dia!! Alguém com alguma ideia do que está acontecendo?
    avatar
    lf0029
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 19/07/2011

    [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário Empty Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário

    Mensagem  lf0029 13/5/2021, 15:29

    Resolvido...falta "s" no nome da caixa de combinação. Obrigado a todos.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3054
    Registrado : 22/11/2016

    [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário Empty Re: [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário

    Mensagem  DamascenoJr. 13/5/2021, 22:34

    Veja o jeito correto de dar o tópico por resolvido.

    https://www.maximoaccess.com/t860-resolucao-de-topicos


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    lf0029
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 19/07/2011

    [Resolvido]Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário Empty Capturar dados de uma linha da Cx de Listagem e jogar em outro formulário

    Mensagem  lf0029 14/5/2021, 23:29

    Ok...obrigado pela explicação.

      Data/hora atual: 18/9/2021, 17:22