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  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 Calculo entre horários

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
Anacleto



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

MensagemAssunto: Calculo entre horários   Qua 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!
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



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

MensagemAssunto: Re: Calculo entre horários   Qui 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
Voltar ao Topo Ir em baixo
Ver perfil do usuário
 
Calculo entre horários
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Já existe uma nova ferramenta para consultar os horários dos comboios em Portugal. Conhece?
» Dicionários
» Aprenda a fazer comentários construtivos
» qual é a diferença entre get e set?
» Ql a diferença entre variaves e variaveis globais ?

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: