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]Valor mínimo de três campos numa consulta

    Compartilhe
    avatar
    Caio
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 301
    Registrado : 27/04/2015

    [Resolvido]Valor mínimo de três campos numa consulta

    Mensagem  Caio em Qua 09 Set 2015, 13:32

    Como faço para juntar 3 campos em formato data em um?
    Quero pegar a menor data registrada de uma linha e colocar em um campo específico.
    avatar
    Cláudio Machado
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1402
    Registrado : 17/03/2011

    Re: [Resolvido]Valor mínimo de três campos numa consulta

    Mensagem  Cláudio Machado em Qua 09 Set 2015, 18:55

    Boa tarde.
    Você pode fazer isso direto na consulta: em Total > Mín


    .................................................................................
    " Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus,  morreu de braços abertos."

    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja  [Você precisa estar registrado e conectado para ver este link.].
    Não esqueça de clicar no Joinha [Você precisa estar registrado e conectado para ver esta imagem.] para agradecer a dica que solucionou seu problema.
    avatar
    Caio
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 301
    Registrado : 27/04/2015

    Re: [Resolvido]Valor mínimo de três campos numa consulta

    Mensagem  Caio em Qui 10 Set 2015, 12:26

    Eu sei, mais precisava que três campos si tornasse um, pois preciso de um campo para o gráfico dinâmico.

    Mais ou menos assim:

    Código:
    DataAtraso    DataFalta     DataAtestado      Data
    21/02/2015   21/03/2015    03/02/2015        03/02/2015
    01/01/2014   22/07/2014    19/08/2014        01/01/2014

    O campo Data pega a menor data dos três campos.
    avatar
    Cláudio Machado
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1402
    Registrado : 17/03/2011

    Re: [Resolvido]Valor mínimo de três campos numa consulta

    Mensagem  Cláudio Machado em Qui 10 Set 2015, 15:30

    Bem vamos lá.

    Cole esta função em um módulo qualquer:

    Código:

    Public Function fncMenorData(c1, c2, c3, c4)
    Dim k

    If c1 <= Nz(c2) Then If (c1) <= (c3) Then If c1 <= c4 Then k = Format(c1, "dd/mm/yyyy")
    If c2 <= Nz(c1) Then If (c2) <= (c3) Then If c2 <= c4 Then k = Format(c2, "dd/mm/yyyy")
    If c3 <= Nz(c1) Then If (c3) <= (c2) Then If c3 <= c4 Then k = Format(c3, "dd/mm/yyyy")
    If c4 <= Nz(c1) Then If (c4) <= (c2) Then If c4 <= c3 Then k = Format(c4, "dd/mm/yyyy")
    fncMenorData = k

    End Function

    Na sua consulta no campo que quer exibir a menor data entre os três campos coloque isso:

    MenorData: fncMenorData([DataFalta];[DataAtraso];[DataAtestado];[DataAtestado])


    Se quiser pode usar também para valores, é só modificar o formato da função de Data para ##,##0.00
    Pronto!
    Agora é so exibir.

    Abraço.


    .................................................................................
    " Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus,  morreu de braços abertos."

    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja  [Você precisa estar registrado e conectado para ver este link.].
    Não esqueça de clicar no Joinha [Você precisa estar registrado e conectado para ver esta imagem.] para agradecer a dica que solucionou seu problema.
    avatar
    Caio
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 301
    Registrado : 27/04/2015

    Re: [Resolvido]Valor mínimo de três campos numa consulta

    Mensagem  Caio em Qui 10 Set 2015, 16:09

    Resolvido.
    Obrigado!
    avatar
    Cláudio Machado
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1402
    Registrado : 17/03/2011

    Re: [Resolvido]Valor mínimo de três campos numa consulta

    Mensagem  Cláudio Machado em Qui 10 Set 2015, 16:14

    O fórum agradece o retorno.


    .................................................................................
    " Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus,  morreu de braços abertos."

    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja  [Você precisa estar registrado e conectado para ver este link.].
    Não esqueça de clicar no Joinha [Você precisa estar registrado e conectado para ver esta imagem.] para agradecer a dica que solucionou seu problema.

      Data/hora atual: Sab 16 Dez 2017, 20:43