Assuming the date is text, try this UDF:
Function changeit(r As Range) As Long
Dim nv As Long
s = Split(r.Value, ":")
nv = 24# * 60# * 60# * s(0)
nv = nv + 60# * 60# * s(1)
nv = nv + 60# * s(2)
nv = nv + s(3)
changeit = nv
End Function
This can also be performed directly on the worksheet, without any VBA:
=LEFT(C4,1)*24*60*60 + MID(C4,3,2)*60*60+MID(C4,6,2)*60+RIGHT(C4,2)
--
Gary''s Student - gsnu200760
"Enigo" wrote:
> Hi,
>
> I have a field that is imported from Siebel to CSV in the format d:hh:mm:ss.
> I need to convert this back to seconds. I have tried changing the format of
> the cells but this does not work.
>
> Can anyone help?
>
> Thanks
|