自定义函数 JSA_A_DATETIMESERIALNUMBER 返回日期时间的序列号

function JSA_A_DATETIMESERIALNUMBER(date){

//函数定义地点：JSA中。

//函数使用地点：A(工作表中、JSA代码中)。

//函数说明：返回日期时间的序列号。

//参数说明：date：可以是表示日期时间的字符串、自世界时1970-01-01 00:00:00(即中国时1970-01-01 08:00:00)以来的毫秒数、单元格、Date对象。

var d = new Date(date);

var serialNumber = (d.getTime() + 2209161600000 + 8*3600000) / 86400000;

return serialNumber;

}

插入函数对话框、函数参数对话框：

加载宏文件function Workbook_Open(){}中添加以下代码。

Application.MacroOptions("JSA_A_DATETIMESERIALNUMBER","返回日期时间的序列号。\n函数定义地点：JSA中。\n函数使用地点：A(工作表中、JSA代码中)。",undefined,undefined,undefined,undefined,14,undefined,undefined,undefined,['可以是表示日期时间的字符串、自世界时1970-01-01 00:00:00(即中国时1970-01-01 08:00:00)以来的毫秒数、单元格、Date对象。']);