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

    Data mais Recente

    avatar
    alvisentini
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 01/08/2022

    Data mais Recente Empty Data mais Recente

    Mensagem  alvisentini 1/8/2022, 01:28

    Olá pessoal,
    Estou precisando de ajuda.

    Tenho um banco de dados, onde numa consulta preciso de um campo que selecione a data mais recente entre 3 campos (Data1, Data2 e Data3) , existe alguma função especifica no Access que traga o resultado (já testei Max, Min não deu certo ...)

    Imagem Ilustrativa

    Data mais Recente Duv10


    Obrigado.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8498
    Registrado : 05/11/2009

    Data mais Recente Empty Re: Data mais Recente

    Mensagem  Alexandre Neves 3/8/2022, 06:22

    Bom dia e bem-vindo ao fórum
    Utilize esta função
    Código:
    Function MaiorData(Optional Valor1 As Date, Optional Valor2 As Date, Optional Valor3 As Date) As Date
        '--------------------------------------------------------------'
        '  código criado por Alexandre Neves, do Fórum MaximoAccess  '
        '    utilize o código livremente mas mantenha os créditos    '
        '--------------------------------------------------------------'
            If Valor1 > Valor2 Then
            If Valor1 > Valor3 Then
                MaiorData = Valor1
            Else
                MaiorData = Valor3
            End If
        Else
            If Valor2 > Valor3 Then
                MaiorData = Valor2
            Else
                MaiorData = Valor3
            End If
        End If
    End Function


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: 21/11/2024, 23:47