Date Function

  • Thread starter Thread starter ExcelMonkey
  • Start date Start date
E

ExcelMonkey

I have variables for year, month, day, and hour. Is there a date
function I can use to view the date as follows:

m/d/yyyy h:mm

DateFunction(year, month, day, hour)
 
I think I can use this

CurrentDate = DateSerial(CurrentYear, CurrentMonth, CurrentDay)
CurrentHour / 2
 
ExcelMonkey,

DateSerial and TimeSerial
eg.

Sub test()
Dim lngYear As Long, lngMonth As Long, lngDay As Long, lngHour As Long
Dim dtm As Date

lngYear = 2004
lngMonth = 2
lngDay = 1
lngHour = 12

dtm = DateSerial(lngYear, lngMonth, lngDay) + TimeSerial(lngHour, 0, 0)

MsgBox Format(dtm, "dd-Mmm-yyyy HH:mm:ss")
End Sub
 
One way:

myDate = DateSerial(year, month, day) + hour / 24
MsgBox Format(myDate, "m/d/yyyy h:mm")
 
Back
Top