如何在VBA中添加2个不同的时间?

我需要从格林威治标准时间转换为UTC时间,并希望添加2个不同的时间。

这是我目前的代码:

Dim CurDate, Correction, UTCTime As Date CurDate = Format(DateTime.Now, "yyyy-MM-dd hh:mm:ss") UTCTime = DateAdd("h", 4.5, CurDate) 

然而,它只是加上小时的整数部分,即4而不是4.5

任何想法,如何实现这一目标?

尝试这个

 UTCTime = DateAdd("n", 4.5 * 60, CurDate) 

在Excel中,一个date的整数部分是天,所以加4.5小时会增加4.5 / 24

 UTCTime = CurDate + 4.5 / 24