如何在vba中进行日期的计算? - VBA 基础知识 - ExcelOffice

如何在vba中进行日期时间的计算?





在编写vba的代码中,不可避免的会遇到需要对日期时间进行处理的情况。

1.在vba中如果要将日期赋值给变量,可以使用如下的语句:

其中用“#”井号分隔的字符,会被当做日期处理。

2.如果要获取当前的系统日期,可以使用如下的语句:

其中Date 函数返回当前的系统日期。

3.如果要获取距离当期系统日期前一个月的日期,可以使用如下的语句:

其中DateAdd 函数既可以计算未来的日期也可以计算过去的日期,第二参数是正数是表示计算距离当期日期以后的日期,负数表示距离当前日期之前的日期。

4.如果要计算两个日期之间相隔的天数,可以使用DateDiff 函数

它的语法如下:

DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])

其中第一个参数interval表示,要计算两个日期之间的时间间隔单位。

比如选择”d”,表示计算两个日期之间间隔的天数。

比如选择”h”,表示计算两个日期之间间隔的小时数。

如以下代码所示:

5.如果要把字符型的日期字符串转换成vba可以识别的日期数据类型,可以使用DateValue函数,如下代码所示:

6.如果要获得日期代表星期几,可以使用Weekday函数。

它的语法如下:

其中第一个参数为日期,第二个参数为指定哪天是一周的开始。

我们一般把周一当做一周的开始,故可以使用如下的代码判断一天具体是星期几:

7.如果要根据年、月、日 3个参数来获得具体的日期,可以使用DateSerial函数。

比如要返回2018年10月1日,可以使用如下的代码:

再比如,如果要获取某个月份的最后一天,可以使用如下的代码:

打赏

发表评论