Convert Julian (Date) to Short Date Format

S

SKB

Is there a function to simply convert a Julian Date to a normal date, i.e.
5257 to 09/14/05?

Thanks, SKB
 
D

Dirk Goldgar

SKB said:
Is there a function to simply convert a Julian Date to a normal date,
i.e. 5257 to 09/14/05?
Click to expand...

Does this example help?

Dim djul As String
Dim dt As Date

djul = "5257"
dt = DateSerial(Left(djul, 1), 1, 0) + Right(djul, 3)
 
S

SKB

Dirk, I see - parse the fields and apply the function; works like a champ!

Thanks, Steve
 
Top