Cells(row, column).value = DateSerial(Year, Month, Day) + TimeSerial(Hours, Minutes, Seconds)
Simply add the two and display the format you need.