vba 将日期时间类型转换成数字型
展开全部
请尝试代码:
Sub Demo()
Dim dt As Date
dt = #7/18/2013 9:57:59 AM#
MsgBox "拆分结果如下:" & vbCrLf & _
"年:" & CStr(Year(dt)) & vbCrLf & _
"月:" & CStr(Month(dt)) & vbCrLf & _
"日:" & CStr(Day(dt)) & vbCrLf & _
"时:" & CStr(Hour(dt)) & vbCrLf & _
"分:" & CStr(Minute(dt)) & vbCrLf & _
"秒:" & CStr(Second(dt)), vbInformation, "日期拆分"
End Sub
运行效果如图所示:
PS:如果是在 Excel 中,上述函数 Year、Month、Day、Hour、Minute、Second 依然行得通。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
将-189 中间输入一个空格,然后直接复制,贴到其表格中,电脑会自动处理成日期格式,这样也就可以调数字型了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
2013-07-189:57:59,这不是数字型,数字型是一串数字,例如12345.678
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
DateValue
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询