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