如何在Excel VBA中减去时间?

big*_*yan 0 excel time datetime vba excel-vba

如何在Excel VBA中减去时间?我试图减去这两个值,但我得到这个值"2.1527777777778E-02".这是什么意思?

Timein = 12/7/16 12:00:00 AM

超时= 12/7/16 12:30:00 AM

这是我的代码示例.提前致谢.

Dim Total as Double
Dim Timein as Date
Dim Timeout as Date

Total = TimeValue(Timeout) - TimeValue(Timein)
'Result Total=2.1527777777778E-02
Run Code Online (Sandbox Code Playgroud)

Hol*_*ger 8

您可以使用DateDiff函数来获取年/日/秒等的差异.

这里是分钟的例子.

Dim Timein As Date
Dim Timeout As Date

Timein = "12/7/16 12:00:00 AM"
Timeout = "12/7/16 12:30:00 AM"
Debug.Print DateDiff("n", Timein, Timeout)
Run Code Online (Sandbox Code Playgroud)

输出:

30
Run Code Online (Sandbox Code Playgroud)

区间说明

yyyy年

q季度

月份

一年中的一天

d天

w平日

小时

n分钟

第二