Como faço o vba identificar que o formato de hora entrou corretamente.

Question

Olá, estou fazendo um formulário onde é guardado arquivos, quando solicito o horário em que o fato aconteceu preciso que o vba identifique que ele entrou no formato hh:mm, caso contrário mostre a mensagem pedindo para consertar.

isso porque o excell irá somar as horas, então se uma das horas entrar em um formato errado, tipo hh;mm a soma não vai ocorrer, por isso preciso que seja identificado que o formato entrou de maneira errada. Obrigado!

Answer 1

Option Explicit

Sub teste()
Dim hora As Date
inicio:
On Error GoTo mensagem
hora = CDate(InputBox("Digite a hora."))
Exit Sub


mensagem:

MsgBox "Digite a hora no formato hh:mm."
GoTo inicio
End Sub

---

Anderson Diniz