Convert Julian (Date) to Short Date Format

09-20-2005, 02:26 PM

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

Thanks, SKB

09-20-2005, 03:07 PM

"SKB" <(E-Mail Removed)> wrote in message
news:8B0F60C0-2135-4935-9BF5-(E-Mail Removed)
> Is there a function to simply convert a Julian Date to a normal date,
> i.e. 5257 to 09/14/05?

Does this example help?

Dim djul As String
Dim dt As Date

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

--
Dirk Goldgar, MS Access MVP
www.datagnostics.com

(please reply to the newsgroup)

09-20-2005, 03:55 PM

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

Thanks, Steve

"Dirk Goldgar" wrote:

> "SKB" <(E-Mail Removed)> wrote in message
> news:8B0F60C0-2135-4935-9BF5-(E-Mail Removed)
> > Is there a function to simply convert a Julian Date to a normal date,
> > i.e. 5257 to 09/14/05?
>
> Does this example help?
>
> Dim djul As String
> Dim dt As Date
>
> djul = "5257"
> dt = DateSerial(Left(djul, 1), 1, 0) + Right(djul, 3)
>
> --
> Dirk Goldgar, MS Access MVP
> www.datagnostics.com
>
> (please reply to the newsgroup)
>
>
>

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Julian Date Format (1,2,3...364, 365) for MS Project 2003	ajearl2	Project Newsgroup	2	04-04-2007 02:56 AM
How to convert Excel serial date into Access date format?	RADO	Access Newsgroup	2	12-27-2003 11:14 AM
Convert date to Julian	Miguel A. Velez	Access Newsgroup	0	12-12-2003 12:05 AM
Re: Short Date Format	Douglas J. Steele	Access Newsgroup	0	07-27-2003 11:41 AM
convert date to julian date	Bon	Access Newsgroup	1	07-03-2003 04:42 PM