Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

日付時刻：数値から日付・時刻データを取得（ DateSerial 関数、TimeSerial 関数）

2015/04/20

DateSerial 関数（数値を使って日付データを取得）

【書式】

date = DateSerial ( year, month, day )

引数・戻り値

year ・・・年を表す 100 ～ 9999 の範囲の数値・数式（Integer）を指定します。
month ・・・月を表す 1 ～ 12 の範囲の数値・数式（Integer）を指定します。
day ・・・日を表す 1 ～ 31 の範囲の数値・数式（Integer）を指定します。
date ・・・引数に指定した年、月、日に対応するバリアント型（内部処理形式 Date）の値。

引数 year, month, day に指定する値が、上記範囲外の場合でもエラーとはならず、その値・他の引数にしたがって計算されてしまうので注意が必要です。
（例）year 15, month -1, day 300 と指定すると戻り値は「2015/8/27」となります。

TimeSerial 関数（数値を使って時刻データを取得）

【書式】

time = TimeSerial ( hour, minute, second )

引数・戻り値

hour ・・・時を表す 0 ～ 23 の範囲の数値・数式（Integer）を指定します。
minute ・・・分を表す 0 ～ 59 の範囲の数値・数式（Integer）を指定します。
second ・・・秒を表す 0 ～ 59 の範囲の数値・数式（Integer）を指定します。
time ・・・引数に指定した時、分、秒に対応するバリアント型（内部処理形式 Date）の値。

引数 hour, minute, second に指定する値が、上記範囲外の場合でもエラーとはならず、その値・他の引数にしたがって計算されてしまうので注意が必要です。
（例）hour -1, minute 100, second 0 と指定すると戻り値は「0:40:00」となります。

DateSerial 関数、TimeSerial 関数の使用例

サンプルVBAソース

　
Sub Sample_DateTimeSerial()
    
    
    Dim str
    
    'DateSerial 関数
    
    str = DateSerial(2015, 10, 7) & Chr(13) & _
          DateSerial(15, -1, 300)
    
    
    'TimeSerial 関数
    
    str = str & Chr(13) & _
          TimeSerial(5, 45, 21) & Chr(13) & _
          TimeSerial(-1, 100, 0)
    
    MsgBox str

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

　

Sub Sample_DateTimeSerial()

Dim str

'DateSerial 関数

str = DateSerial(2015, 10, 7) & Chr(13) & _

DateSerial(15, -1, 300)

'TimeSerial 関数

str = str & Chr(13) & _

TimeSerial(5, 45, 21) & Chr(13) & _

TimeSerial(-1, 100, 0)

MsgBox str

End Sub

　

実行結果

- VBA基本 dateserial 関数, timeserial 関数, VBA基本, エクセルVBA, 日付取得, 時刻取得

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 色の設定（ColorIndex プロパティ・Colors プロパティ）

ColorIndex プロパティ ColorIndex プロパティは、指定したオ …

: ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）

CentimetersToPoints メソッドセンチメートル単位の値をポイン …

: VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）

論理演算子論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …

: 日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数）

DateValue 関数（文字列から日付データを取得）【書式】 date_va …

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

: メッセージボックスを表示（MsgBox関数）

MsgBox関数【書式】 result = MsgBox ( Prompt [ …

: VBAの変数宣言

VBAの変数宣言について変数を暗黙的に宣言するエクセル VBA の場合、明示 …

: 文字列：定数（改行・タブ）

改行・タブの定数これらの定数は、使用前に定義する必要はありません。コード中のど …

: 文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

InStrRev 関数任意の文字列の中で、指定した文字列を最後から検索して、見 …

: 変数が数値型かどうかをチェックする（ IsNumeric 関数）

IsNumeric 関数の使い方【書式】 result = IsNumeric …

PREV: 日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数）
NEXT: 日付時刻：日付時刻データを計算（ DateAdd 関数）