日付時刻:数値から日付・時刻データを取得( DateSerial 関数、TimeSerial 関数 )
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ソース
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 |
実行結果
関連記事
-
-
色の設定(ColorIndex プロパティ・Colors プロパティ)
ColorIndex プロパティ ColorIndex プロパティは、指定したオ …
-
-
文字列:文字列を最後から検索してその最初の文字位置を返す(InStrRev 関数)
InStrRev 関数 任意の文字列の中で、指定した文字列を最後から検索して、見 …
-
-
文字列:文字列右から指定文字数取得(Right 関数,RightB 関数)
Right 関数・RightB 関数 の使い方 【書式】 result_righ …
-
-
取り消し線を設定する(Strikethrough プロパティ)
取り消し線を設定する(Strikethrough プロパティ) Striketh …
-
-
CPU に制御を移す(DoEvents 関数)
DoEvents 関数 DoEvents 関数を実行すると、CPU に制御を移し …
-
-
VBA の演算子(演算子の優先順位)
演算子の優先順位 演算子の優先順位とは、1つの式の中に演算子が複数ある場合、どの …
-
-
データをクリアする(ClearContents メソッド)
ClearContents メソッド 対象がセル範囲(Range オブジェクト) …
-
-
カレントフォルダ(CurDir 関数、ChDir ステートメント、ChDrive ステートメント)
カレントフォルダ カレントフォルダとは、ブックを開いたり保存するときに既定で参照 …
-
-
画面の更新を停止(ScreenUpdating プロパティ)
画面の更新を停止 マクロを実行すると、画面が更新されます。これにより、実行速度が …
-
-
配列(宣言・要素数の変更について)
配列の宣言 【書式】※ 配列の宣言 <Type 型の静的配列(固定長配列)の宣言 …