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]Converter Minutos em Horas Negativas / Positiva

    Compartilhe
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 653
    Registrado : 09/11/2012

    [Resolvido]Converter Minutos em Horas Negativas / Positiva

    Mensagem  =>Nois em Qui 27 Out 2016, 13:32

    Boa tarde!

    estou a utilizar esta função


    Function mintotime(myminute)
            mintotime = myminute \ 60 & ":" & Format((Abs(myminute Mod _
             60)), "00")
         End Function


    no entanto percebi que nao me retorna negativo abaixo 00:59 minutos

    Exemplo

    eu tenho um campo calculado que me retorna a quantidade de minutos, depois disso converto esse resultado para horas e minutos

    suponhamos que o meu resultado deu -58 minutos teoricamente ficaria assim: -00:58, no entanto só aparece 00:58

    acima de 01:00 me retorna correto: -01:00 (no caso de -60 minutos)

    neste caso percebi que com esta função acima só aparece o sinal de Menos "-" só quando é maior ou igual a uma hora 01:00


    alguem tem uma solução simples com relação a isso, preciso colocar o resultado em uma coluna de uma consulta

    tentei um paleativo mas esta dando erro ainda... acho que estou declarando o -59 fora de ordem ou algo assim...

    Prazo: SeImed([calcmin]<0;"-" & mintotime([CalcMin]);SeImed([calcmin]<-59;"-" & mintotime([CalcMin]);mintotime([CalcMin])))


    modelo:

    [Você precisa estar registrado e conectado para ver esta imagem.]
    Anexos
    Calculo_de_Permanencia 22_01.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (80 Kb) Baixado 16 vez(es)


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 653
    Registrado : 09/11/2012

    Re: [Resolvido]Converter Minutos em Horas Negativas / Positiva

    Mensagem  =>Nois em Qui 27 Out 2016, 14:35

    Funcionou assim:

    Prazo: SeImed([calcmin]>=0;mintotime([CalcMin]);SeImed([CalcMin]<0 E [CalcMin]<-59;mintotime([CalcMin]);"-" & mintotime([CalcMin])))

    Alguem tem alguma outra solução mais simples?


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 653
    Registrado : 09/11/2012

    Re: [Resolvido]Converter Minutos em Horas Negativas / Positiva

    Mensagem  =>Nois em Qui 27 Out 2016, 22:24

    Vou usar o recurso que fiz, resolvido.


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4541
    Registrado : 15/03/2013

    Re: [Resolvido]Converter Minutos em Horas Negativas / Positiva

    Mensagem  ahteixeira em Sex 28 Out 2016, 09:24

    Olá, obrigado por partilhar a solução que adotou.
    Os membros do fórum agradecem.
    Abraço

      Data/hora atual: Qui 23 Nov 2017, 23:47