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]Calcular Cargas Horárias acima de 23h 59min

    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 4/3/2016, 15:36

    Olá, Feras do Access!! Smile

    Estou tendo um probleminha que está me tirando o sono: Sad

    Por favor, como faço calcular as Cargas Horárias (subform Módulos), que obrigatoriamente, em alguns casos são acima de 23h59min.?!

    Um forte abraço,
    Guilherme
    Anexos
    [Resolvido]Calcular Cargas Horárias acima de 23h 59min AttachmentMaximoExemplo.zip
    Sistema com o problema
    Você não tem permissão para fazer download dos arquivos anexados.
    (103 Kb) Baixado 13 vez(es)
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  Avelino Sampaio em 4/3/2016, 15:53

    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 4/3/2016, 16:06

    Olá, Mestre Avelino!

    Boa tarde. Smile


    Mestre o seu exemplo é excelente, mas infelizmente no meu caso, eu não fico com horas limitadas a um dia, e sim, eu as digito (000:00). Sad
    E no meu exemplo, também, será muito comum digitarmos diretamente no campo da Carga Horária (000:00), valores bem acima de 24:00.

    Mas... Tenha a certeza que eu guardarei este exemplo que você disponibilizou. e Muito obrigado pela habitual disponibilidade em nos ajudar. \O/ \O/ \O/ \O/

    Um forte abraço,
    Guilherme B. Pereira
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  Avelino Sampaio em 4/3/2016, 16:34

    Ok

    Não vi seu projeto mas acho que vc pode transforma tudo para minutos para depois retornar a seu formato. Supondo que tenha dois valores para somar

    070:20 + 050:15

    (70*60)+20 + (50*60) +15 = 7235 minutos

    Para retornar ao formato:

    int(7235/60) & ":" & (7235 mod 60) :::> 120:35

    Sucesso!
    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 4/3/2016, 17:05

    Olá, Mestre Avelino!

    Tentei utilizando a função =esquerda([Mod_CH];3), mas infelizmente não deu, pois tenho cargas de 02:00, 22:45, 126:15... e não funcionou. Sad
    Também apliquei o =Int([Mod_CH]), e infelizmente ele me devolve o valor por completo. Sad

    Valeu, Mestre!

    Mas... por favor, o senhor informa que não abriu o sistema. Smile Sem ser indelicado, por favor, veja como desenhei a lógica do campo carga horária. Smile


    Um forte abraço,
    Guilherme
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  Avelino Sampaio em 4/3/2016, 17:40

    Use a função split() para separar os valores, tendo como referência os dois pontos (Smile

    Exemplo:

    Dim k
    k = split("22:45",":")
    k(0) ::> 22
    k(1) ::> 45


    Sucesso!
    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 4/3/2016, 21:47

    Olá, Mestre Avelino!

    Meu Caro, fiz as mais diversas tentativas com o split e infelizmente não obtive êxito com os resultados. Busquei na web algum exemplo semelhante ao meu problema mas infelizmente não encontrei. Sad

    Vou pedir aos colegas do MaximoAccess.com para ver se eles têm uma solução diferente, ou consigam localizar onde estou errando com a função que você me sugeriu.

    Valeu pela força Mestre. Um forte abraço, Smile
    Guilherme

    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 5/3/2016, 01:09

    Olá, Mestre Avelino e Colegas!

    Pesquisando na web localizei um bom exemplo de conversão em Minutos, para depois aplicar o Format, conforme explicação do Mestre Avelino Sampaio.

    Mas... Deparei-me com um outro probleminha... Sad
    Não estou conseguindo colocar máscara de entrada ou mesmo informar valor zero horas!

    Por favor, meus caros, vocês que entendem essas nuances e mistérios do Access Smile Me deem uma força.

    Um forte abraço,
    Guilherme
    Anexos
    [Resolvido]Calcular Cargas Horárias acima de 23h 59min AttachmentMaximoExemplo - 02.zip
    Arquivo com uma solução quase completa e um exemplo do Mestre Avelino (2013)
    Você não tem permissão para fazer download dos arquivos anexados.
    (164 Kb) Baixado 6 vez(es)
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  Avelino Sampaio em 5/3/2016, 10:31

    Olá!

    Segue modificações:

    1º - criei uma consulta para obter o valor em MINUTOS.  Abra a consulta qryEventosS1_mod e observe a fórmula utilizada abaixo:

    Mod_ch_m: Aval(Substituir([mod_ch];":";"*60 +"))

    2º - passei a origem do subformulário para esta consulta.  Acrescentei o campo mod_ch_m ao subformulário e passei sua propriedade visível para NÃO

    3º - NO campo soma usei a seguinte fórmula:

    =Int(Soma([mod_ch_m])/60) & ":" & (Soma([mod_ch_m]) Mod 60)

    Sucesso!
    Anexos
    [Resolvido]Calcular Cargas Horárias acima de 23h 59min AttachmentMaximoExemplo_rev1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (79 Kb) Baixado 31 vez(es)
    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 5/3/2016, 11:39

    Olá, Mestre Avelino!

    Bom Dia!!! \O/ \O/ \O/ \O/

    Mestre, aprendi com a vida e com a História, que a tradução mais bacana da palavra Meu muito Obrigado!!!, é O melhor Reconhecimento e a Gratidão!!! \O/ \O/ \O/ \O/


    Valeu, Mesmo, de Coração!!!



    Um Super-Forte abraço. E que o Nosso Deus sempre Abençoe os Nossos Passos e de Nossos Entes.
    Do sempre,
    Guilherme B. Pereira
    grbpereira
    grbpereira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 113
    Registrado : 11/05/2012

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  grbpereira em 5/3/2016, 13:24

    Mestre Avelino Sampaio!!!


    O nosso Carinhoso abraço!!! Smile
    Guilherme e Família

    Conteúdo patrocinado

    [Resolvido]Calcular Cargas Horárias acima de 23h 59min Empty Re: [Resolvido]Calcular Cargas Horárias acima de 23h 59min

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 16/6/2019, 21:51