欧非资源网:安全、免费、专业放心的资源下载站! 最新软件|软件分类

您的位置:欧非资源网 > Excel专区 > Excel教程 > excel中vba日期函数和vba时间函数的应用以及相关的函数列表

excel中vba日期函数和vba时间函数的应用以及相关的函数列表

时间:2020-01-31 20:11作者:admin来源:未知人气:804我要评论(0)

第一,vba日期和时间函数的基本用法

  Excel中vba日期函数和时间函数分别是DATE和TIME。

  VBA提供了三个无参数函数:Date、Time、Now,分别返回当前电脑系统的日期、时间、日期+时间。

  下面的代码我们以三个消息框来结合日期和时间函数,分别提示当前的日期、时间。

Sub vba时间和日期函数()
MsgBox Date
MsgBox Time
MsgBox Now
End Sub

第二,使用vba日期和时间函数修改系统信息

  下面这段代码将电脑右下角的日期和时间修改为2011年1月1日21:50:00。

Sub 修改时间和日期()
Time = "21:50:00"
Date = "2011年1月1日"
End Sub

第三,用消息框返回当前日期的年、月、日和当前时间的时、分、秒

Sub SmpYearHour()
'以对话框显示当前日期的年、月、日
MsgBox "当前日期:" & Date & Chr(10) & _
"年:" & Year(Date) & Chr(10) & _
"月:" & Month(Date) & Chr(10) & _
"日:" & Day(Date)
'以对话框显示当前时间的时、分、秒
MsgBox "当前时间:" & Time & Chr(10) & _
"时:" & Hour(Time) & Chr(10) & _
"分:" & Minute(Time) & Chr(10) & _
"秒:" & Second(Time)
End Sub

第四,其余的vba日期和时间函数列表

  Timer:返回一个 Single,代表从**开始到现在经过的秒数。

  TimeSerial(hour, minute, second):返回一个 Variant (Date),包含具有具体时、分、秒的时间。

  DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) 返回 Variant (Long) 的值,表示两个指定日期间的时间间隔数目。

  Second(time) 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一分钟之中的某个秒。

  Minute(time) 返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一小时中的某分钟。

  Hour(time) 返回一个 Variant (Integer),其值为 0 到 23 之间的整数,表示一天之中的某一钟点。

  Day(date)返回一个 Variant (Integer),其值为 1 到 31 之间的整数,表示一个月中的某一日。

  Month(date) 返回一个 Variant (Integer),其值为 1 到 12 之间的整数,表示一年中的某月。

  Year(date) 返回 Variant (Integer),包含表示年份的整数。

  Weekday(date, [firstdayofweek]) 返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几。

相关阅读 你想学的FILTER函数用法,很全了当Excel体积臃肿,运行卡顿时,我们应该做些什么?带合并单元格的表格,求和计数也不难​Excel筛选条件怎么设置​ExcelA4页面怎么设置​Excel表格A列被隐藏了怎么恢复​Excel图例位于底部怎么设置​Excel图表怎么嵌入单元格​Excel没保存不小心关闭怎么恢复​Excel图表怎么设置X轴Y轴

文章评论
发表评论

热门文章 excel怎么制作表格?制作excel表格的步骤技巧excel 常见的六个排序方法,你必须要学会excel自动换行显示不全怎么办excel 数据透视表 选定区域不能分组 的原因和解决方法

最新文章 你想学的FILTER函数用法,很全了当Excel体积臃肿,运行卡顿时,我们应该做些什么? 带合并单元格的表格,求和计数也不难​Excel筛选条件怎么设置​ExcelA4页面怎么设置​Excel表格A列被隐藏了怎么恢复

人气排行 excel怎么制作表格?制作excel表格的步骤技巧excel 常见的六个排序方法,你必须要学会excel自动换行显示不全怎么办excel 数据透视表 选定区域不能分组 的原因和解决方法Excel高级筛选怎么用 excel高级筛选多个条件(并且、或用法)excel if函数的多个条件使用方法Excel中的快速填充键ctrl+e没反应,不能用是为什么?excel 判断两列数据是否一致的四种方法

盖楼回复X

(您的评论需要经过审核才能显示)