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]Ajuda com caixa listagem

    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]Ajuda com caixa listagem Empty [Resolvido]Ajuda com caixa listagem

    Mensagem  Mylton 19/8/2016, 17:56

    Boa tarde
    Estou enrolado com essa caixa de listagem.
    Nessa aplicação de 4 tabelas e 1 form dividido, a caixa busca os dados na tabela ASO, que alimenta o form ASO, onde os dados nome e o numero do Processo originam-se da tabela processo, através de uma consulta.
    A ideia é quando escolher o nome na caixa, que o numero e o nome da pessoa sejam visualizados nas suas caixas, para que possa prosseguir com o cadastro.
    todavia, quando escolho o nome, os dados vão de forma trocada.
    E assim... não consigo salvar.
    Apos ter salvo, a ideia e exportar depois por uma consulta (já criada).
    Como poderia resolver essa dúvida?
    Obrigado.



    Última edição por Mylton em 19/8/2016, 20:26, editado 1 vez(es)
    avatar
    zuuGG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 29/10/2013

    [Resolvido]Ajuda com caixa listagem Empty Re: [Resolvido]Ajuda com caixa listagem

    Mensagem  zuuGG 19/8/2016, 18:02

    Olá Mylton, boa tarde!

    No evento "AfterUpdate" tente digitar o seguinte código:

    Código:
        
        Dim rs As Object
        Set rs = Me.Recordset.Clone
        rs.FindFirst "[ColunaTabela] = " & Str(Nz(Me!caixadelistagem], 0))
        If Not rs.EOF Then Me.Bookmark = rs.Bookmark


    A coluna da tabela deve ser a coluna contendo os nomes listados na caixa de listagem!
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]Ajuda com caixa listagem Empty Re: [Resolvido]Ajuda com caixa listagem

    Mensagem  Mylton 19/8/2016, 18:42

    Zuu
    Rs...
    o campo...
    [ColunaTabela]
    refere-se à?
    campo chave?
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]Ajuda com caixa listagem Empty Re: [Resolvido]Ajuda com caixa listagem

    Mensagem  Mylton 19/8/2016, 18:48

    se buscar o nome...A coluna da tabela deve ser a coluna contendo os nomes listados na caixa de listagem!

    seria ele NomeAvaliado que está na tabela processo?

    Além disso dá erro de fim de instrução...
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]Ajuda com caixa listagem Empty Re: [Resolvido]Ajuda com caixa listagem

    Mensagem  Mylton 19/8/2016, 20:25

    Consegui resolver.
    obrigado.

    Conteúdo patrocinado


    [Resolvido]Ajuda com caixa listagem Empty Re: [Resolvido]Ajuda com caixa listagem

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 05:24