Luciano Franklin dos Santo

Prezados, tenho um código VBA, cuja função será pesquisar resultados como: nome do aluno, data de entrada, matricula, laboratório, horário de entrada e horário de saída, ocorre que ao receber o resultado da pesquisa, o dado recolhido da hora de entrada ou horário de saída, está saindo número inteiro (Formatei para inserir o número inteiro na célula Ex: 1700 e sair 17:00 com a seguinte formatação: 0/:00) no código abaixo coloquei a informação no Format, só que ele está exibindo somente inteiro quando tem um só resultato, quando existe mais de um resultado ele aparece corretamente. Peço ajuda se possível de vocês. Private Sub SpinButton1_Change() Dim Linha As Long Dim TotalOcorrencias As Long TotalOcorrencias = SpinButton1.Max + 1 Linha = MatrizResultados(SpinButton1.Value) Label_Registros_Contador.Caption = SpinButton1.Value + 1 & " de " & TotalOcorrencias BoxNomedoAluno.Text = Plan1.Cells(Linha, 2).Value BoxMatricula.Text = Plan1.Cells(Linha, 3).Value BoxData.Text = Format(Plan1.Cells(Linha, 4).Value, "dd/mm/yyyy") BoxLaboratorio.Text = Plan1.Cells(Linha, 5).Value BoxHorarioEntrada.Text = Format(Plan1.Cells(Linha, 6).Value, "0\:00") BoxHorarioSaida.Text = Format(Plan1.Cells(Linha, 7).Value, "0\:00") BoxMotivo.Text = Plan1.Cells(Linha, 8).Value End Sub