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


Verne wrote in message
...
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?