Date format

[EPBoone]

We use a Julian Date for just about everything where I work. How can I format the date for this? For example, a Julian date for March 16th, 2001 would look like: 01075.

01 being the year.
075 being the day of the year.

 

[dneufarth]

=Right(Year([yourdate]),2) & Format(Day([yourdate]),"000&quot


Dave

 

[MichaelRed]

MyJulianDate = "01075"
MyYr = Str(Left(MyJulianDate, 2))
MyDay = Right(MyJulianDate, 3)
MyDate = DateAdd("d", MyDay - 1, "01/01/" & (MyYr))
? MyDate
3/16/01


Although it is somewhat curious. You Julian Dates are Zero Based? That's why the " - 1" is in the date artithmatic.

MichaelRed
redmsp@erols.com

There is never time to do it right but there is always time to do it over