指定日付の年・月・日を表示する

サンプルソース

' 現在日時を変数にセット
strNow = Now()

' 年を表示
Cells(1,1) = Year(strNow)

' 月を表示
Cells(1,1) = Month(strNow)

' 日を表示
Cells(1,1) = Day(strNow)

' 時を表示
Cells(1,1) = Hour(strNow)

' 分を表示
Cells(1,1) = Minute(strNow)

' 秒を表示
Cells(1,1) = Second(strNow)

解説

Year()は指定日付の"年"、Month()は"月"、Day()は"日"、
Hour()は指定日付の"時"、Minute()は"分"、Second()は"秒"を取得します。




日付操作



Excel VBA講座
VBScriptサンプル集

データ型操作
Copyright (C) ExcelVBA@Workshop All rights reserved.