Функция TimeSerial

Возвращает значение типа Variant (Date), содержащее время для определенных значений часов, минут и секунд.

Синтаксис

TimeSerial ( часы, минуты, секунды )

Функция TimeSerial имеет следующие аргументы:

Аргумент

Описание

часы

Обязательный аргумент типа Variant (Integer). Число в диапазоне от 0 (00:00) до 23 (23:00) включительно или числовое выражение.

минуты

Обязательный аргумент типа Variant (Integer). Любое числовое выражение.

секунды

Обязательный аргумент типа Variant (Integer). Любое числовое выражение.


Замечания

Чтобы указать время, например 11:59:59, числа для каждого аргумента функции TimeSerial должны находиться в допустимом диапазоне для данного элемента, то есть 0–23 для часов и 0–59 для минут и секунд. Однако можно также указать относительное время для каждого аргумента, используя любое числовое выражение, представляющее количество часов, минут и секунд до или после определенного времени. В следующем примере вместо абсолютных значений, составляющих время, используются выражения. Функция TimeSerial возвращает время за 6 часов (12 - 6) и 15 минут (-15) до полудня, то есть 05:45:00.

TimeSerial(12 - 6, -15, 0)

Если значение аргумента лежит вне допустимого диапазона, изменяется значение следующего по величине элемента. Например, если задано значение 75 минут, оно преобразуется в 1 час 15 минут. Если какой-либо из аргументов имеет значение, лежащее вне диапазона от -32 768 до 32 767, возникает ошибка. Если заданное тремя аргументами время обозначает дату, находящуюся вне допустимого диапазона дат, возникает ошибка.

Пример

Примечание : В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В этом примере функция TimeSerial используется для получения времени, определенного указанными значениями часов, минут и секунд.

Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.
Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×