文字列表記の日付をシリアル値にします。
- 構文
- Double = getSerialTime( date )
- 引数
- date
- 日付(”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”)
- 戻値
- シリアル値
プログラム
//////////////////////////////////////////////////
// 【引数】
// date : 日付(”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”)
// 【戻値】
// シリアル値
//////////////////////////////////////////////////
FUNCTION getSerialTime(uwscTime)
RESULT = (GETTIME(0, uwscTime) - GETTIME(0, "1899/12/30 00:00:00")) / 86400
FEND
解説
- 2行目
「1899/12/30 00:00:00」から変数dateまでの日数RESULT = (GETTIME(0, uwscTime) - GETTIME(0, "1899/12/30 00:00:00")) / 86400
この記事は役に立ちましたか?