Vba计算j列日期时间减I列日期时间,得到的小时数和分钟数,结果写到K列
时间: 2024-05-30 19:14:28 浏览: 152
vba事件日期.rar_NBH_VBA事件日期_VBa_vba日期_vba时间事件
这个问题是关于VBA的,我可以回答。您可以使用DateDiff函数来计算两个日期时间之间的差值,然后将结果转换成小时数和分钟数,最后将它们写入K列。具体的VBA代码可以是这样的:
Sub CalculateTimeDifference()
Dim lastRow As Long
Dim i As Long
Dim date1 As Date
Dim date2 As Date
Dim hours As Long
Dim minutes As Long
lastRow = Range("I" & Rows.Count).End(xlUp).Row
For i = 2 To lastRow
date1 = Range("I" & i).Value
date2 = Range("J" & i).Value
hours = DateDiff("h", date1, date2)
minutes = DateDiff("n", date1, date2) Mod 60
Range("K" & i).Value = hours & "小时" & minutes & "分钟"
Next i
End Sub
希望这个回答对您有帮助。
阅读全文