Excel 在VBA中设置日期/时间格式以允许IF语句工作

Excel 在VBA中设置日期/时间格式以允许IF语句工作,excel,vba,Excel,Vba,在excel中,我有一些报告给我一列日期(m/d/yy在a列)和一列时间(hh:mm:ss在B列)。如果时间在“07:00:00”之前,我对将日期列为前一天有异议。为了解决这个问题,我通常在“C”列中运行一个IF语句,该语句表示=IF(B2可以用 w1.Range("C1") = TimeSerial(7, 0, 0) …并跟进 w1.Range("C1").NumberFormat = "hh:mm:ss" 这将确定一个正确的上午7:00开始时间(例如0.291667) 您为C2提供的IF

在excel中,我有一些报告给我一列日期(
m/d/yy
在a列)和一列时间(
hh:mm:ss
在B列)。如果时间在“07:00:00”之前,我对将日期列为前一天有异议。为了解决这个问题,我通常在“C”列中运行一个IF语句,该语句表示
=IF(B2可以用

w1.Range("C1") = TimeSerial(7, 0, 0)
…并跟进

w1.Range("C1").NumberFormat = "hh:mm:ss"
这将确定一个正确的上午7:00开始时间(例如0.291667)

您为C2提供的IF公式可能更好

w1.Range("C2").Formula = "=A2 + (B2<$C$1)"
w1.范围(“C2”).公式=“=A2+(B2
w1.Range("C2").Formula = "=A2 + (B2<$C$1)"