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

    [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5

    avatar
    kitsuneelt
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 25/08/2014

    [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5 Empty [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5

    Mensagem  kitsuneelt 21/10/2014, 19:49

    Galera, alguém pode dar uma ajuda, tenho esses dados abaixo

    00:01:30
    00:02:00
    00:01:00
    00:00:30

    Gostaria que ficasse assim.

    1,5
    2,0
    1
    0,5
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3711
    Registrado : 04/04/2010

    [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5 Empty Re: [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5

    Mensagem  Avelino Sampaio 21/10/2014, 19:54

    E 01:50:15 como ficaria ?


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso irrestrito ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    kitsuneelt
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 25/08/2014

    [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5 Empty Re: [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5

    Mensagem  kitsuneelt 21/10/2014, 19:57

    Ai está uma boa pergunta Avelino Smile, sei que você manja muito de access, como posso fazer esse procedimento, contando com está hora que você colocou?
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3711
    Registrado : 04/04/2010

    [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5 Empty Re: [Resolvido]horas, minutos, segundos para decimal 00:01:30 -> 1,5

    Mensagem  Avelino Sampaio 21/10/2014, 20:12

    Bom, creio que o resultado esperado seja este: 110,25

    Copie a função abaixo para um módulo global

    Public Function fncHoraDecimal(hora As Date) As Single
    Dim p
    p = Split(hora, ":")
    fncHoraDecimal = (p(0) * 60) + p(1) + (p(2) / 60)
    End Function


    Crie um campo virtual na consulta, chamando pela função:

    NovoCampo: fncHoraDecimal([dur])

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso irrestrito ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.

      Data/hora atual: 13/4/2021, 13:59