Fórum Excel Bácico, Avançado e Vba
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  Últimas imagensÚltimas imagens  ProcurarProcurar  RegistarRegistar  Entrar  

 

 Calculo entre horários

Ir para baixo 
2 participantes
AutorMensagem
Anacleto




Mensagens : 86
Data de inscrição : 04/04/2012

Calculo entre horários Empty
MensagemAssunto: Calculo entre horários   Calculo entre horários EmptyQua Mar 05, 2014 5:48 pm

Bom dia!

Segue abaixo o link de uma planilha exemplo:

http://www.4shared.com/file/3O2ej4w-ce/Calculo_entre_Horas_VBA.html

Preciso resolver este problema, quando é digitado um valor de hora acima de 24:00 e a pessoa que estiver digitando o valor hora digitar desta forma 24:00 gera um erro no código

Private Sub Tb_Resultado_Enter()

Me.Tb_Resultado = Format(24 - (1 - (TimeValue(Me.Tb_H_Saida) - TimeValue(Me.Tb_HoraProj))), "hh:nn")

End Sub
Se digitar o valor horas desta forma 00:00 o calculo é efetuado com sucesso. Desta forma preciso bloquear para que não possa digitar com esse formato 24:00, ou até pode digitar mas que seja transformado para 00:00.

Outra solução que vejo é criar um tratamento deste erro, porem não consegui monta-lo.

desde já agradeço a atenção de todos!
Ir para o topo Ir para baixo
alexandrevba

alexandrevba


Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

Calculo entre horários Empty
MensagemAssunto: Re: Calculo entre horários   Calculo entre horários EmptyQui Mar 06, 2014 9:09 pm

Boa tarde!!!

Eu não sei se entendi, mas já tentou..
Código:
Private Sub Tb_Resultado_Enter()
    If Me.Tb_HoraProj = "24:00" Then
        MsgBox "Favor digitar valor menor que 24Hrs"
        Exit Sub
      Else
        Me.Tb_Resultado = Format(24 - (1 - (TimeValue(Me.Tb_H_Saida) - TimeValue(Me.Tb_HoraProj))), "hh:nn")
    End If
End Sub

Att
Ir para o topo Ir para baixo
 
Calculo entre horários
Ir para o topo 
Página 1 de 1
 Tópicos semelhantes
-
» Calculo de horas
» Fórmula Cálculo IR
» Cálculo de iluminação
» Cálculo de Matriz
» VBA - Calculo de horas acima de 24hs

Permissões neste sub-fórumNão podes responder a tópicos
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: