# TimeSerial Function

Calculates a serial time value for the specified hour, minute, and second parameters that are passed as numeric value. You can then use this value to calculate the difference between times.

## āļāˇāļģāļ āļģāˇāļ­āˇāļē:

``````
TimeSerial (hour, minute, second)
``````

āļ¯āˇāļąāļē

## āļ´āļģāˇāļ¸āˇāļ­āˇāļąāˇ:

hour: Any integer expression that indicates the hour of the time that is used to determine the serial time value. Valid values: 0-23.

minute: Any integer expression that indicates the minute of the time that is used to determine the serial time value. In general, use values between 0 and 59. However, you can also use values that lie outside of this range, where the number of minutes influence the hour value.

second: Any integer expression that indicates the second of the time that is used to determine the serial time value. In general, you can use values between 0 and 59. However, you can also use values that lie outside of this range, where the number seconds influences the minute value.

Examples:

12, -5, 45 corresponds to 11, 55, 45

12, 61, 45 corresponds to 13, 2, 45

12, 20, -2 corresponds to 12, 19, 58

12, 20, 63 corresponds to 12, 21, 4

āļāļļāļ§ āļāˇāļŊ āˇāˇāļąāˇ āļāļĢāļąāļē āļāļŊ āˇāˇāļāˇ āˇāļą āļ´āļģāˇāļ¯āˇ āļāļąāˇāļ¸ āļāˇāļŊāļēāļāˇ āļ­āļąāˇ āļāļāļēāļāļ§ āļ´āļģāˇāˇāļģāˇāļ­āļąāļē āļāˇāļģāˇāļ¸āļ§ TimeValue āļāˇâāļģāˇāļēāˇāˇ āļˇāˇāˇāˇāļ­āˇ āļāļģāļąāˇāļą.

The TimeSerial function returns the type Variant with VarType 7 (Date). This value is stored internally as a double-precision number between 0 and 0.9999999999. As opposed to the DateSerial or DateValue function, where the serial date values are calculated as days relative to a fixed date, you can calculate with values returned by the TimeSerial function, but you cannot evaluate them.

In the TimeValue function, you can pass a string as a parameter containing the time. For the TimeSerial function, however, you can pass the individual parameters (hour, minute, second) as separate numeric expressions.

### Error codes:

5 Invalid procedure call

## āļāļ¯āˇāˇāļģāļĢāļē:

``````
Sub ExampleTimeSerial
Dim dDate As Double, sDate As String
dDate = TimeSerial(8,30,15)
sDate = TimeSerial(8,30,15)
MsgBox dDate,64,"Time as a number"
MsgBox sDate,64,"Formatted time"
End Sub
``````