'获取最后一行
Range("A" & Rows.Count).End(xlUp).Row
'将文本转换为时间格式
TimeValue("12:00")
'对时间格式进行加减
(TimeValue("12:00")-TimeValue("10:10"))*24=1.83小时
Range("A" & Rows.Count).End(xlUp).Row
'将文本转换为时间格式
TimeValue("12:00")
'对时间格式进行加减
(TimeValue("12:00")-TimeValue("10:10"))*24=1.83小时