Funkcja VBA Hour zwraca liczbę całkowitą odpowiadającą godzinie określonej daty lub godziny.
Hour(data_godzina)
Korzystanie z funkcji Hour w celu uzyskania odpowiednich informacji o czasie:
Sub HourExample1() myHour = #6:36:45 PM# MsgBox Hour(myHour) 'Zwroty: 18 End Sub
Lub według daty i godziny (dla tego samego wyniku):
Sub HourExample2() myDate = #10/31/2020 6:36:45 PM# MsgBox Hour(myDate) 'Zwroty: 18 End Sub
Ta funkcja akceptuje również godzinę lub datę z czasem w formacie tekstowym:
Sub HourExample3() myDate = "31.10.2020 18:36:45" MsgBox Hour(myDate) 'Zwroty: 18 End Sub