Hi, all.
I have inserted a new module as following :
Option Explicit
' RETURNS: A three digit Julian day as a string.
Function Date2Julian(MyDate As Date) As String
Date2Julian = Format(MyDate - DateSerial(Year(MyDate) - 1, 12, 31), "000")
End Function
This module is to turn my date into 3...