Довідка LibreOffice 24.8
Обчислює значення часу в числовому форматі для зазначених години, хвилин і секунд, які передаються як числові значення. Потім це значення можна використовувати для обчислення різниці між двома значеннями часу.
TimeSerial (година, хвилина, секунда)
Дата
година: будь-який цілий вираз, що вказує годину часу, яка використовується для визначення значення часу в числовому форматі. Допустимі значення: 0-23.
хвилина: будь-який цілий вираз, що визначає хвилини часу, використовувані для визначення значення часу в числовому форматі. Зазвичай використовуються значення від 0 до 59. Однак також можна використовувати значення, що не входять в цей діапазон. Тоді кількість хвилин впливає на значення годин.
секунда: будь-який цілий вираз, що визначає секунди часу, використовувані для визначення значення часу в числовому форматі. Зазвичай використовуються значення від 0 до 59. Однак також можна використовувати значення, що не входять в цей діапазон. Тоді кількість секунд впливає на значення хвилин.
Приклади:
12, -5, 45 відповідають 11, 55, 45
12, 61, 45 відповідають 13, 2, 45
12, 20, -2 відповідають 12, 19, 58
12, 20, 63 відповідають 12, 21, 4
Можна скористатися функцією TimeSerial, щоб перетворити будь-який час в єдине значення, яке можна використовувати для обчислення різниці значень часу.
Функція TimeSerial повертає дані типу Variant з VarType 7 (Date). Це значення зберігається як число з подвійним ступенем точності від 0 до 0,9999999999. В протилежність функції DateSerial або DateValue, де значення дат у числовому форматі обчислюється як кількість днів відносно фіксованої дати, значення, що повертаються функцією TimeSerial, можна використовувати в обчисленнях, але не можна оцінити.
У функції TimeValue можна передавати значення часу у вигляді рядка. Однак у функції TimeSerial можна передавати окремі параметри (година, хвилина, секунда) як окремі числові вирази.
Sub ExampleTimeSerial
Dim dDate As Double, sDate As String
dDate = TimeSerial(8,30,15)
sDate = TimeSerial(8,30,15)
MsgBox dDate,64,"Час як число"
MsgBox sDate,64,"Форматований час"
End Sub