将日期和小数时间合并为 mm/dd/yyyy hh:mm 格式

Question

4

针对时间 7:00 AM; 7:15 AM,.... 17:00;17:15，以及日期在 B6 区域内，我想将这些值拼接在一起，但是我得到的值的格式为 02/21/2018 0.29917。如何将它转换为 02/21/2018 7:00 的格式，以此类推...

c 是时间值(7:00 AM, 7:15 AM... 6:00 PM)

For i = 0 To lRow - 1
    c = ActiveCell.Offset(i, 0).Value
    ActiveCell.Offset(i, 0).Value = dateofProject & " " & c
Next i

- aspan88

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- user4039065 · Accepted Answer

将时间添加到日期中以达到日期时间的目的。

ActiveCell.Offset(i, 0).Value = dateofProject + c

将结果单元格格式设置为mm/dd/yyyy hh:mm am/pm。

这假定日期是真实的日期，时间是真实的时间，而不是看起来像日期或时间的文本。