Splitting data in a cell

[Verne]

I have a spreadsheet that has a date and time in one
cell. I need to use this data to generate an SLA report
showing the time difference between the two. How do I
separate (strip) the two different data types so I can
analyze it to create my SLA reports?

 

[Tom Ogilvy]

dim dtDate as Date
dtDate = Int(Range("A1").Value)
msgbox format(dtDate, "mm/dd/yyyy")

By taking the integer part of the number you strip off the time.

in a worksheet formula

=Trunc(A1)
format the cell as date.

Regards,
Tom Ogilvy

 

[Tom Ogilvy]

Of couse the time would be
dim dtDate as Date
dim dtTime as Date
dtDate = Int(Range("A1").Value)
dtTime = Range("A1").Value - dtDate
msgbox format(dtDate, "mm/dd/yyyy") & " - " & _
format(dtTime,"hh:mm:ss")


=A1-trunc(a1) and format as time.
Regards,
Tom Ogilvy