VBA Second 関数は、指定された日付または時刻の秒に対応する整数を返します。
Second(日付_時刻)
Second 関数を使用して、関連する時間情報を取得します。
Sub SecondExample1() myHour = #6:36:45 PM# MsgBox Second(myHour) '戻り値: 45 End Sub
または、日付と時刻によって (同じ結果の場合):
Sub SecondExample2() myDate = #10/31/2020 6:36:45 PM# MsgBox Second(myDate) '戻り値: 45 End Sub
この関数は、テキスト形式の時刻または時刻を含む日付も受け入れます。
Sub SecondExample3() myDate = "2020/10/31 18:36:45" MsgBox Second(myDate) '戻り値: 45 End Sub