I am looking at functions that convert standard date to Julian data and vice versa.

I tried to search the forum, but found nothing.


use this:

dim jd as Double ' julian day
dim mDate as date ' your date
mdate = Now()
jd = mdate.ToOADate
Be a part of the DaniWeb community

We're a friendly, industry-focused community of 1.18 million developers, IT pros, digital marketers, and technology enthusiasts learning and sharing knowledge.