Returning a date as a serial umber
 

I have a datetime as a variant variable. How can I format
it as the equivalent serial number?

Returning a date as a serial umber
 

Sub test()
Dim D As Date
D = Now
MsgBox Format(D, "General Number")
End Sub

(You should use a Date and not a Variant if Datetime is what it's filed with
at all times)
--
HTH. Best wishes Harald
Followup to newsgroup only please

"David" skrev i melding
...
I have a datetime as a variant variable. How can I format
it as the equivalent serial number?