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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 引数が省略されたかどうかをチェックする（ IsMissing 関数）

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

: 文字列：文字列の長さを取得（ Len 関数、LenB 関数）

Len 関数（文字列の長さを取得）【書式】 result_len = Len …

: 指定した数値に対応する選択肢の値・数式を返す（Choose 関数）

Choose 関数の使い方 Choose 関数は、指定されたインデックス値（１ …

: 取り消し線を設定する（Strikethrough プロパティ)

取り消し線を設定する（Strikethrough プロパティ) Striketh …

: 文字列：文字列の空白を削除（Trim 関数, LTrim関数, RTrim関数）

Trim 関数・LTrim 関数・RTrim 関数の使い方【書式】＜先頭と末 …

: 文字列：文字列左から指定文字数取得（Left 関数,LeftB 関数）

Left 関数・LeftB 関数の使い方【書式】 result_left = …

: 画面の更新を停止（ScreenUpdating プロパティ）

画面の更新を停止マクロを実行すると、画面が更新されます。これにより、実行速度が …

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

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

: 文字列：文字列右から指定文字数取得（Right 関数,RightB 関数）

Right 関数・RightB 関数の使い方【書式】 result_righ …

: 日付時刻：時・分・秒を取得（Hour、Minute、Second 関数）

日付時刻から時・分・秒を取得する関数【書式】 time_hour = Hour …

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