VBA如何比较时间大小。如08：40（八点四十）和08：41（八点四十一）

VBA如何比较时间大小。如08：40（八点四十）和08：41（八点四十一）

为了表示三种不同的情况，即，大于、等于和小于，给你个例子，
因为日期和时间都是数值，直接对比即可
Sub test()
Dim a, b
a = Range("A1")
b = Range("B1")
If a > b Then
MsgBox "单元格A1大于单元格B1"
ElseIf a = b Then
MsgBox "单元格A1等于单元格B1"
Else
MsgBox "单元格A1小于单元格B1"
End If
End Sub

用datediff 来判断就可以了
Sub test()
Dim a As Date
Dim b As Date
Dim c
a = "8:40"
b = "8:41"
c = DateDiff("n", a, b)
If c > 0 Then
Else
End If
End Sub

为了表达三种不同的情况，也就是大于，等于，小于给你举个例子，
因为日期和时间值，直接比较

试验（+）

点心A，B

B =范围（“B1”）=范围（“A1”）

如果A> b然后

MSGBOX“单元格A1大于B1单元格中 BR /> elseif的为a = b然后

MSGBOX“单元格A1等于单元格B1”

品

MSGBOX“单元格A1是不到小区B1”
结束如果结束小组