Справка Collabora Office 24.04
Возвращает час, принимая в качестве параметра значение времени, созданное функцией TimeSerial или TimeValue.
Hour (Число)
Integer
Число: числовое выражение, содержащее значение времени в числовом формате, которое используется для извлечения значения часов.
Эта функция обратна функции TimeSerial и возвращает целое число, являющееся количеством часов из значения времени, полученного с помощью функции TimeSerial или TimeValue. Например, выражение
Print Hour(TimeSerial(12,30,41))
возвращает значение 12.
Sub ExampleHour
Print "Текущий час - " & Hour( Now )
End Sub