MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    Soma de Horas

    avatar
    fabiolds
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 23/08/2018

    Soma de Horas Empty Soma de Horas

    Mensagem  fabiolds em 20/12/2018, 17:09

    Eu tenho um campo que calcula o total de horas de desconto de um contrato da seguinte maneira:

    Public Function CalculaIntervalo(HI As Date, HF As Date) As String
    On Error Resume Next

    Intervalo = HF - HI

    vdf = CDate(HF)
    vdi = CDate(HI)
    Interval = vdf - vdi

    Horas = Int(CSng(Interval * 24))
    minutos = Int(CSng(Interval * 1440)) Mod 60
    segundos = Int(CSng(Interval * 86400)) Mod 60

    CalculaIntervalo = Horas & " : " & Format(Interval, "nn")

    End Function

    O intervalo Hf e Hi é baseado em data e hora, ou seja, :

    HI= 06/12/2018 7:00
    HF= 07/12/2018 12:00
    Intervalo= 29:00

    Até aqui td certo.

    Mas agora precisamos de outro campo que calcule o intervalo considerando apenas as horas entre 7:00 e 19:00

    Ou seja,

    HI= 06/12/2018 7:00
    HF= 07/12/2018 12:00
    Intervalo= 17:00

    Não estou conseguindo realizar o calculo desta maneira, considerando apenas as horas executadas entre 7:00 e 19:00. Alguém poderia me ajudar?
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4225
    Registrado : 06/11/2009

    Soma de Horas Empty Re: Soma de Horas

    Mensagem  Assis em 20/12/2018, 18:44

    Boa noite

    Tem de procurar, veja aqui no forum o que deseja.


    https://www.dropbox.com/s/s4fntz1giz61tyn/SomaHorasNaConsulta.txt?dl=0


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Ney Herber 001
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 02/07/2018

    Soma de Horas Empty Re: Soma de Horas

    Mensagem  Ney Herber 001 em 30/9/2019, 22:12

    boa tarde, estou com uma enorme dificuldade....
    tenho um campo chamado horas trabalhadas, neste campo já preencho o número de horas por dia (ex: 07:00),
    preciso somar entas horas, como faço isso?

    vi o link deixado acima....
    mas eu não soube bem o que fazer com ele....kkkk Embarassed Embarassed Embarassed

      Data/hora atual: 23/10/2020, 12:33