MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

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

    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    [Resolvido]Converter Minutos em Horas Negativas / Positiva

    Mensagem  =>Nois em Qui 27 Out 2016, 16: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 7 vez(es)


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

    Se tudo não der certo reflita nessa frase: "Huguinho", "Zezinho" & "Luizinho"

    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

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

    Mensagem  =>Nois em Qui 27 Out 2016, 17: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 reflita nessa frase: "Huguinho", "Zezinho" & "Luizinho"

    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

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

    Mensagem  =>Nois em Sex 28 Out 2016, 01: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 reflita nessa frase: "Huguinho", "Zezinho" & "Luizinho"

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em Sex 28 Out 2016, 12:24

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

      Data/hora atual: Sab 03 Dez 2016, 19:37