Question

excel VBA中时间类型数据怎么比较

如果某一单元个有一个时间类型的数据,我在VBA中读出这个数据,并和一个时间进行比较,应该怎么写代码?
如:If Worksheets(1).Range("h29").Value> 某时间 Then
*******
Else
********
End If
某时间应该怎么写?是不是要特定格式或加个什么函数?
我太菜,希望高手指点!
是时间,不是日期.

Answer 1

这么简单的应该不需要用vba吧，直接选择一个单元格做绝对变量，然后在单元格中输入想对比的日期，然后增加一列设置数值型，取考勤时间和这个时间的差，然后排序就可以看见了。
这个顺序是来得越早的人越在前面，如果想看最接近七点半的人，可以在公式里加个if判断，为负时取反就可以。
如果需要多个时间段，将时间取出，然后排序就可以

Answer 2

excel以1900/1/1作为“第一天”，某日期就是第几天的意思。例如：
1900/1/1 = 1
1901/1/1 = 367（从1900/1/1开始 的第367天）
如此类推

你把你的时间先输入一个单元格，然后复制，再选择性粘贴成数值格式，就可以知道这个数值了。

Answer 3

如日期, 假设 2007年12月31日
DateValue("2007-12-31")
DateValue("2007/12/31")
DateSerial(2007, 12, 31)

如时间, 假设 下午1时30分
TimeValue("13:30:00")
TimeSerial(13, 30, 0)