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

    Buscar em outra tabela intervalo de dados.

    avatar
    jowfs
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 16/04/2012

    Buscar em outra tabela intervalo de dados. Empty Buscar em outra tabela intervalo de dados.

    Mensagem  jowfs 6/1/2017, 10:20

    Pessoal, bom dia!

    Preciso de ajuda com a seguinte situação:

    Tenho uma tabela onde constam vencimentos por data de corte, por exemplo, Faturas emitidas entre 01/01/2017 e 04/01/2017 devem ser programadas para vencer em 25/01/2017, faturas emitidas entre 05/01/2017 e 11/01/2017 devem ser programadas para vencer em 01/02/2017:

    [CorteData Inicial] [CorteData Final] [CorteVencimento]
    01/01/2017 04/01/2017 25/01/2017
    05/01/2017 11/01/2017 01/02/2017
    12/01/2017 18/01/2017 08/02/2017
    19/01/2017 25/01/2017 15/02/2017
    26/01/2017 26/01/2017 22/02/2017

    E tenho um formulário onde serão criadas as faturas. Preciso que ao emitir a fatura, seja feita uma pesquisa na tabela de cortes e já seja fixado o vencimento correspondente. Por exemplo, se a fatura for criada em 03/01/2017, o vencimento deverá ser automaticamente preenchido com o vencimento 25/01/2017.
    Acho que a função Dlookup seria a mais indicada, mas não tenho experiência na utilização da função para pesquisa num intervalo de dados. Podem me ajudar?

    Me.FaturamentoFaturaVencimento = DLookup("[CorteVencimento]", "TabCorte", "(Entre[CorteDataInicio]e[CorteDataFim])=[FaturamentoFaturaVencimento]")

    Na verdade eu preciso saber como monto essa parte: (Entre[CorteDataInicio]e[CorteDataFim])

    Desde já agradeço!
    avatar
    jowfs
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 16/04/2012

    Buscar em outra tabela intervalo de dados. Empty Re: Buscar em outra tabela intervalo de dados.

    Mensagem  jowfs 19/1/2017, 17:01

    Alguém? Crying or Very sad
    avatar
    ilvecchio
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 137
    Registrado : 16/11/2012

    Buscar em outra tabela intervalo de dados. Empty Re: Buscar em outra tabela intervalo de dados.

    Mensagem  ilvecchio 19/1/2017, 18:40

    Buenas!

    Acho que você precisa carregar para o formulário (ao abrir) a data de vencimento( [CorteVencimento]) correspondente à maior data (máx([CorteData Final]) menor ou igual a data atual.
    Faça uma consulta SQL no formulário para obter a informação e depois coloque-a num campo (invisível) do formulário. Ou, se preferir, numa variável.
    Ao gerar uma fatura, o vencimento seria carregado a partir do campo, ou da variável.
    avatar
    jowfs
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 16/04/2012

    Buscar em outra tabela intervalo de dados. Empty Re: Buscar em outra tabela intervalo de dados.

    Mensagem  jowfs 10/2/2017, 14:18

    Olá Ivecchio, boa tarde!

    Em primeiro lugar, muito obrigado por se dispor a me ajudar neste caso e em segundo, peço desculpas pela demora ao te responder.
    Na verdade tenho outras funções na empresa e só consigo mexer nesse projeto em meu tempo livre.
    Bem... Eu até entendi o que você propôs e acho mesmo que pode funcionar.
    A minha dúvida é: Como eu desenvolvo este comando no VBA?
    Você consegue me enviar um script para este caso?

    Valeu!

    Conteúdo patrocinado


    Buscar em outra tabela intervalo de dados. Empty Re: Buscar em outra tabela intervalo de dados.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 02:16