MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Função Dlookup - Formulário

    Compartilhe

    LorenaMota
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 03/08/2017

    Função Dlookup - Formulário

    Mensagem  LorenaMota em 3/8/2017, 20:58

    Ola pessoal,
    Estou com uma dúvida estou querendo utilizar a função Dlookup no meu banco de dados aonde tenho uma caixa de combinação Itens e tenho os campos Preço Unitário,Preço Venda, Lucro , Estoque.

    Gostaria que quando eu selecionar um produto na coluna itens as outras colunas automaticamente sejam preenchidas.

    Já procurei em muitos lugares mais não conseguir resolver.
    Deste já eu agradeço.Obrigada.
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 362
    Registrado : 05/12/2016

    Re: Função Dlookup - Formulário

    Mensagem  caiosouza em 3/8/2017, 21:02

    Basicamente vc precisa que através do nº do item seja preenchido os 4 campos mencionados?
    E onde deseja visualizar os dados? Numa caixa de texto?


    .................................................................................
    A persistência leva ao sucesso!

    LorenaMota
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 03/08/2017

    Re: Função Dlookup - Formulário

    Mensagem  LorenaMota em 4/8/2017, 18:08

    Eu preciso que quando eu selecionar um item, o restante apareça nas caixas de texto Preço Unitário, Preço de Venda, Lucro e Estoque. As caixas de texto já estão criadas, está no formulário.
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 362
    Registrado : 05/12/2016

    Re: Função Dlookup - Formulário

    Mensagem  caiosouza em 4/8/2017, 18:19

    Boa tarde,

    No evento Ao Alterar do Seu campo TXT_ITEM coloque:

    Código:
    Me.TXT_PRECO_UNITARIO = DLookup("preco_unitario", "Sua tabela", "item= " & forms!SeuFormulario!TXT_ITEM)
    Me.TXT_PRECO_VENDA = DLookup("preco_venda", "Sua tabela", "item= " & forms!SeuFormulario!TXT_ITEM)
    Me.TXT_LUCRO = DLookup("lucro", "Sua tabela", "item= " & forms!SeuFormulario!TXT_ITEM)
    Me.TXT_ESTOQUE = DLookup("estoque", "Sua tabela", "item= " & forms!SeuFormulario!TXT_ITEM)


    .................................................................................
    A persistência leva ao sucesso!

    LorenaMota
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 03/08/2017

    Re: Função Dlookup - Formulário

    Mensagem  LorenaMota em 4/8/2017, 19:20

    Eu não sei o que eu estou fazendo de errado mais não estou conseguindo enviar os print's, mais posso te mandar o banco de dados. Você poderia da uma olhada?

    Deste já te agradeço.
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 362
    Registrado : 05/12/2016

    Re: Função Dlookup - Formulário

    Mensagem  caiosouza em 4/8/2017, 19:38

    Olha, pode sim. Poste no aqui para outras pessoas poderem participar do fórum e me envie no e-mail [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    A persistência leva ao sucesso!

    LorenaMota
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 6
    Registrado : 03/08/2017

    Re: Função Dlookup - Formulário

    Mensagem  LorenaMota em 4/8/2017, 20:16

    Já postei o banco de dados mais irei mandar através do seu email.

    Obrigada.
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 362
    Registrado : 05/12/2016

    Re: Função Dlookup - Formulário

    Mensagem  caiosouza em 4/8/2017, 23:57

    Boa noite,

    Segue banco de dados enviado pela nossa amiga Lonena.

    Aqui vão algumas sugestões para bom uso e facilidade de manutenção do seu sistema:

    1 - Nome de tabelas, consulta, formulários, relatórios, modulos e macros devem sempre estar de uma forma que no ambiente de desenvolvimento em VBA vc não os confunda. Ex.: Em vez de Produtos, vc pode colocar tab_produtos... Menu vc pode colocar fml_menu.

    2 - O mesmo serve para o nome dos seus controles, nunca deixe espaços e acentos nos teus comando, tanto nas tabelas quando no nome dos campos no formulário.

    3 - Use sempre números sequências (que não se repetem) para esse tipo de função. Pois buscando por Texto a busca de dados não é sempre muito confiável. Por conta de existir a possibilidade dos Textos se repetirem.


    Para entender melhor, olhe com  atenção os novos nomes no seu sistema.
    Anexos
    Caixa.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (33 Kb) Baixado 19 vez(es)


    Última edição por caiosouza em 5/8/2017, 00:02, editado 1 vez(es)


    .................................................................................
    A persistência leva ao sucesso!
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 362
    Registrado : 05/12/2016

    Re: Função Dlookup - Formulário

    Mensagem  caiosouza em 4/8/2017, 23:58

    Para conhecimento de todos, segue banco de dados antigo.
    Anexos
    Caixa_old.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (77 Kb) Baixado 10 vez(es)


    .................................................................................
    A persistência leva ao sucesso!

      Data/hora atual: 15/12/2018, 09:38