Extracting first two digits of a time entry!!

[roshinpp_77]

HI friends,
Could anyone tell me how to extract first two digits of a "Time
value"

For example in cell B10 the content is 12:00 ie..(Time)
I am not able to extract "12" ie the first two digits of that time.

I am getting 0.5013 when taken as text.


Regards,
TIA


Roshin

 

[Mike]

HI friends,
Could anyone tell me how to extract first two digits of a "Time
value"

For example in cell B10 the content is 12:00 ie..(Time)
I am not able to extract "12" ie the first two digits of that time.

I am getting 0.5013 when taken as text.


Regards,
TIA


Roshin

Hello,
use this left(range("B10").text,2)

Mike,Luxembourg

 

[Xcelion]

Hi Roshin,

Try this
=LEFT(TEXT(B10,"hh:mm"),2)

 

[NickHK]

Depending what you actually want returned, a string or a number.
Assuming the value is a double formatted as a time:
Public Function GetHourOnly(argRange As Range) As Integer
GetHourOnly = Int(argRange.Value * 24)
End Function
Or
Public Function GetHourOnly(argRange As Range) As String
GetHourOnly = Left(argRange.Text, 2)
End Function

NickHK

"roshinpp_77" <[email protected]>
wrote in message
news:[email protected]...

 

[Dave Peterson]

You can extract the hour, minute or second:

With ActiveSheet.range("B10")
MsgBox Hour(.Value) & vbLf & _
Minute(.Value) & vbLf & _
Second(.Value)
End With