Feb 13, 2003 #1 ryan1 Programmer May 15, 2002 106 US Does anybody know how to change a date to a Julin Date??I Need Some Help
Feb 13, 2003 #2 Rick39 Programmer May 11, 2001 426 US Public Function JulianDate(MyDate As Variant) As Long MyDate = Forms!MyForm![Date Generated] If IsNull(MyDate) Then Exit Function JulianDate = Right$("000" & DatePart("y", MyDate), 3) End Function Upvote 0 Downvote
Public Function JulianDate(MyDate As Variant) As Long MyDate = Forms!MyForm![Date Generated] If IsNull(MyDate) Then Exit Function JulianDate = Right$("000" & DatePart("y", MyDate), 3) End Function