Reference sheets named by DAY
Dim myDate As Date
myDate = #1/1/2001 9:30:00 AM#
MsgBox CStr(myDate)
The result is: "01.01.2001 09:30:00"
Dim myDate As Double
myDate = #1/1/2001 9:30:00 AM#
MsgBox CStr(myDate)
The result is:"36892.3958333333
Dim myDate As Double
myDate = #1/1/2001 9:30:00 AM#
MsgBox CStr(Day(myDate))
The result = "1" as well with dimension date and double
Regards
Claus B.
Now that's a plateful!
Howard
|