日時形式から時間を抽出するにはどうすればよいです12/10/2012 12:18:58 PM
か?
Hour(Format(d1, "mm/dd/yyyy HH:mm:ss HH24"))
別のスタック オーバーフローの質問でこれを見つけましたが、うまくいきませんでした。
これはうまくいくはずです
=TEXT(D1, "hh")
時間としてフォーマットする
として、またはとして認識可能な文字列D1
として日付/時刻が含まれている場合は、次を使用します。Date Time Serial Number
date time
=Hour(D1)
例D1
= 文字列21/03/2013 18:45:00
=Hour(D1)
=18
例D1
= 41354.781250
then =Hour(D1)
=18
注:D1
値が含まれる場合がありますが、日付/時刻として表示されるようにフォーマットされます。セル番号の形式を確認してください。
VBAでこれを行うには、これを試してください
Sub demo()
Dim rng As Range
Dim Hr As Long
Set rng = Range("D1")
Hr = Hour(rng.Value)
Debug.Print Hr
End Sub
結果をImmediate Window
試してみてください:
Hour(format(now(), "yyyy-MM-dd hh:mm:ss"))
これを試してみてください http://www.vb6.us/tutorials/date-time-functions-visual-basic vbaで実際に動作します
またはNow
、今すぐ日付と時刻が必要な場合に使用します