excel 如何计算小时、分钟、秒的总和

vyu0f0g1 于 2023-11-20 发布在其他

关注(0)|答案(1)|浏览(116)

我有一个代码，它将得到一个列，其中有不同的持续时间。格式是“hh：mm：ss”。我需要把所有这些加起来（这将超过24小时），并在最后以相同的格式得到一个总数。有没有办法在MySQL中做到这一点？

standbyTime = CDate(ThisWorkbook.Worksheets("Sheet1").Cells(dateCell.Row, "U").Value)
failureTime = CDate(ThisWorkbook.Worksheets("Sheet1").Cells(dateCell.Row, "W").Value)
powerOffTime = CDate(ThisWorkbook.Worksheets("Sheet1").Cells(dateCell.Row, "X").Value)
                        
If (ThisWorkbook.Worksheets("Sheet1").Cells(dateCell.Row, "W").Value <> "") Then
   operationalTime = TimeValue(failureTime) - TimeValue(standbyTime)
Else
   operationalTime = TimeValue(powerOffTime) - TimeValue(standbyTime)
End If
                        
totalTime = totalTime + operationalTime

字符串
这段代码会随时间滚动。
输出的格式应该是100：35：20
有什么想法吗？

excel

来源：https://stackoverflow.com/questions/77488088/how-to-add-up-hours-mins-seconds-in-vba

1条答案

按热度按时间

wnavrhmk1#

示例：

的数据
假设你在单元格中有这些值，那么代码将是：

Sub SumTimes()
Dim d As Double
Dim w As Worksheet
Set w = ThisWorkbook.Worksheets("Sheet1")
d = w.Range("b2").Value2 + w.Range("b3").Value2 + w.Range("b4").Value2 ' be aware of value2
Dim h As Long, m As Long, s As Long
h = Fix(d * 24) ' hours
m = Fix(d * 1440) - h * 60 ' Minutes
s = Fix(d * 86400) - h * 3600 - m * 60 ' Seconds

MsgBox h & ":" & m & ":" & s

End Sub

字符串
确保使用Value2

赞(0）回复(0）举报 2023-11-20

我来回答

excel 如何计算小时、分钟、秒的总和

1条答案

相关问题

热门标签

最新问答