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


    [Resolvido]Pesquisar em Consulta

    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 276
    Registrado : 05/04/2016

    [Resolvido]Pesquisar em Consulta Empty [Resolvido]Pesquisar em Consulta

    Mensagem  Luís Antunes em 24/10/2018, 00:20

    Tenho um form "Frm_VedasSub" onde gostaria que reflectisse um campo "Estoque" De uma consulta "Cs_Geral"
    Fiz várias tentativas sem sucesso, deve haver algum conflito que não descortino.
    Envio, em anexo, a BD com  dúvida.

    Grato pela vossa disponibilidade

    Luís Antunes
    Anexos
    [Resolvido]Pesquisar em Consulta AttachmentDuvidaPesquisa.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (335 Kb) Baixado 9 vez(es)
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10591
    Registrado : 04/11/2009

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  JPaulo em 24/10/2018, 11:51

    Ola;

    Código:
    =DLookUp("[Estoque]";"[Cs_Geral]";"[Cs_Geral]![CodTabDet]=" & [Forms]![Frm_VendasSub].[Form]![CodTabDet])



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Pesquisar em Consulta Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Pesquisar em Consulta Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Pesquisar em Consulta Folder_announce_new Instruções SQL como utilizar...
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 276
    Registrado : 05/04/2016

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  Luís Antunes em 24/10/2018, 22:00

    J.Paulo
    O Código funciona no "Frm_VendasSub mas, quando associado ao form "Frm_Vendas Dá erro.
    Envio novamente a BD com o Form Vendas, não esperava que deixasse de funcionar com form Vendas.
    Agradeço a sua disponibilidade

    Luís Antunes
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 276
    Registrado : 05/04/2016

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  Luís Antunes em 24/10/2018, 23:32

    J, Paulo
    Não enviei o anexo. vou tentar enviá-lo agora
    Anexos
    [Resolvido]Pesquisar em Consulta AttachmentDuvidaPesquisa.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (339 Kb) Baixado 13 vez(es)
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 276
    Registrado : 05/04/2016

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  Luís Antunes em 30/10/2018, 22:32

    Ainda à volta da pesquisa. Estou a tentar que dê certo com o VBA se me ajudarem com este código

    Private Sub Txt_Stoque_BeforeUpdate(Cancel As Integer)
    DoCmd.RunCommand DLookup(Estoque, Cs_Geral, Cs_Geral!CodTabDet = Forms!Frm_VendasSub.Form!CodTabDet)
    End Sub

    A Consulta Cs_Geral Tem o código "CodTabDet
    O Form Frm_VendasSub tem o mesmo código

    Luís Antunes
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10591
    Registrado : 04/11/2009

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  JPaulo em 31/10/2018, 11:15

    Ola Luis;

    No exemplo falta a tabela compras para eu poder testar.

    No entanto, você está a fazer o DLookup no subform que está dentro do form.
    Dessa forma tem de instanciar os dois forms assim;

    Código:
    =DLookUp("[Estoque]";"[Cs_Geral]";"[Cs_Geral]![CodTabDet]=" & [Forms]![Frm_Vendas]![Frm_VendasSub].[Form]![CodTabDet])


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Pesquisar em Consulta Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Pesquisar em Consulta Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Pesquisar em Consulta Folder_announce_new Instruções SQL como utilizar...
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 276
    Registrado : 05/04/2016

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  Luís Antunes em 1/11/2018, 00:05

    Boa noite J. Paulo
    A fórmula deu certo e fico-lhe grato.
    Preciso apenas de adequar as colunas do sub ao form Vendas. Há alguma maneira de automatizar esse processo?
    Se necessitar de abrir outro tópico dou este tópico como resolvido.

    Luís Antunes
    avatar
    Luís Antunes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 276
    Registrado : 05/04/2016

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  Luís Antunes em 1/11/2018, 18:58

    Já consegui dimensionar as colunas no subform Com a vista de esquema
    Grato pela ajuda
    Luís Antunes
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10591
    Registrado : 04/11/2009

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  JPaulo em 2/11/2018, 14:32

    Obrigado pelo retorno o forum agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Pesquisar em Consulta Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Pesquisar em Consulta Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Pesquisar em Consulta Folder_announce_new Instruções SQL como utilizar...

    Conteúdo patrocinado

    [Resolvido]Pesquisar em Consulta Empty Re: [Resolvido]Pesquisar em Consulta

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/12/2019, 18:18