Thread: date serial
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
AA2e72E AA2e72E is offline
external usenet poster
  
Posts: 400
Default date serial
try:

Sub aa()
Dim serdate As Long
serdate = DateValue(Now)
End Sub

Reply With QuoteReply With Quote