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


2 participantes

    [Resolvidos]Corverter minutos em horas.

    Luís Augusto
    Luís Augusto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 28/10/2011

    [Resolvidos]Corverter minutos em horas. Empty [Resolvidos]Corverter minutos em horas.

    Mensagem  Luís Augusto 20/2/2012, 01:17

    Boa noite pessoal, poderiam me ajudar a converter minutos em hh:nn numa consulta?

    Criei uma consulta baseada em duas informações:[Numcircuitos] e [QtdPecas].
    Considero 2 minutos por circuito para o tempo total. Minha tentativa de expressão ficou assim:

    O campo abaixo será calculado.

    TotalHoras: Format((([NumCircuitos]*[QtdPecas])*2)/60;"Hora abreviada")

    Ou seja:
    O total de horas = ((numero de circuitos * a qtd de peças)*2) dividido por 60 min.

    Está retornando um valor completamente errado, veja um exemplo:
    ((12*1)*2)=24; está retornando 09:36, gostaria que retornasse 00:24

    Me desculpem caso este tema já tenha sido abordado por outra pessoa anteriormente, não encontrei situação similar.
    Desde de já, muito obrigado.

    Luís Augusto.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvidos]Corverter minutos em horas. Empty Re: [Resolvidos]Corverter minutos em horas.

    Mensagem  criquio 20/2/2012, 01:49

    Tente dividir o total por 60 para achar a hora e depois coloque ":" e depois o total de horas novamente MOD 60 para retornar o resto da divisão nos minutos.

    =Round(Format([Campo1]*[Campo2]*2/60);"00");0) & ":" & Format([Campo1]*[Campo2]*2 MOD 60);"00")

    Mais ou menos por aí. O Round é para arredondar a hora e o MOD retorna o que sobra da hora como minutos.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Luís Augusto
    Luís Augusto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 28/10/2011

    [Resolvidos]Corverter minutos em horas. Empty Re: [Resolvidos]Corverter minutos em horas.

    Mensagem  Luís Augusto 20/2/2012, 16:40

    Boa tarde Criquio, infelizmente está dando erro na Consulta, editei conforme sugeriu e ficou assim:
    Round(Format([NumCircuitos]*[QtdPecas]*2/60);"00");0) & ":" & Format([NumCircuitos]*[QtdPecas]*2 MOD 60);"00")

    O erro esta descrito da seguinte maneira:
    A expressão que você inseriu contém uma sintaxe inválida ou você precisa delimitar o texto entre aspas.
    Apos a msg ser fechada, o foco é movido para o ponto e vírgula em vermelho na expressão acima.

    Tem alguma sugestão? O tal do SQL é meio complicado pra mim, ora virgula, ora ponto e vírgula, enfim.
    Muito obrigado.
    Luís Augusto
    Luís Augusto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 28/10/2011

    [Resolvidos]Corverter minutos em horas. Empty Re: [Resolvidos]Corverter minutos em horas.

    Mensagem  Luís Augusto 20/2/2012, 21:52

    Boa a noite a todos.
    Criquio, muito obrigado pela ajuda. Sinceramente ajuda muito quando é explicado para que serve determinada função, ainda mais quando está iniciando, se não fosse isso, certamente não teria "juntado os pontos".

    Consegui resolver o problema lendo um tópico encontrado no google.

    Segue: http://comunidade.itlab.com.br/eve/forums/a/tpc/f/449606231/m/415605331

    Ficou da seguinte maneira:
    O que mudou, foi que criei o campo [TotalMin] para depois fazer o que pretendia.

    TotalHor: Int([TotalMin]/60) & ":" & Format([TotalMin] Mod 60;"00")

    Seguindo o mesmo principio cheguei ao número de dias e horas. Devo ressaltar que o meu dia tem 518 minutos por isso [QtdDias] foi dividido por 518. Caso o dia tivesse 24h teria que dividir por 1440.

    Segue em anexo a consulta.
    Anexos
    [Resolvidos]Corverter minutos em horas. AttachmentConsulta.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (224 Kb) Baixado 49 vez(es)
    Luís Augusto
    Luís Augusto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 129
    Registrado : 28/10/2011

    [Resolvidos]Corverter minutos em horas. Empty Re: [Resolvidos]Corverter minutos em horas.

    Mensagem  Luís Augusto 21/2/2012, 00:00

    Embora o tópico já tenha sido resolvido, gostaria de uma outra ajuda caso possível. O campo [TotalHor] após a conversão de minutos para hora, ficou do tipo texto, ou seja não consigo utilizar o resultado para fazer uma soma sequer, comparar dados do tipo hora então nem pensar. Tentei usar o F1 para a questão mas não obtive muito sucesso. Gostaria de converter texto "86:24" para hh,nn 86:24. No help tinha o Cdate então após a o uso ficou assim:
    TotalHor: CData(Int([TotalMin]/60) & ":" & Format([TotalMin] Mod 60;"00"))

    Funciona até 23:59 após isso da erro, algum dos mestres poderiam me ajudar a contornar essa situação? Tenho a intenção de confrontar dados com o campo calculado [TotalHor].

    Desde de já muito obrigado.

    Conteúdo patrocinado


    [Resolvidos]Corverter minutos em horas. Empty Re: [Resolvidos]Corverter minutos em horas.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 06:22