Time Formatting within VBA

[BrianExcel]

I have a textbox that displays the hours of operation for whatever location is entered.

Right now, if you look at the source data on the worksheet it shows 7:00 AM (although it's actually 7:00:00 AM if you click within the cell).

BUT, when I program my code to pull this cell's value, it shows as 0.3125 )the text value instead of the time value).

What code can I use to translate that into the time referenced above? I could change the source data but there are over 30,000 records. I'd rather just code it...

 

[cgcamal]

Hi Brian,

Maybe this works for what you want.

Private Sub UserForm_Activate()
    TextBox1.Value = Range("A1").Text
End Sub

Regards.