时间总和,转换为每小时升 excel 电子表格
Time sum, convert to liters per hour excel spreadsheet
我正在使用电子表格 运行 我们在耐力赛车比赛中的燃油策略。
我有两个按钮可以将时间添加到两个单元格中,比如单元格 A1
中的坑,单元格 B1
中的坑。两个单元格的按钮单击事件都是 ActiveCell.Offset(0, 2).Value = Time()
,针对每个单元格进行寻址,并且单元格文本将为 6:33:23 AM
,例如。
在第 3 个单元格 A3
中,我使用了下面的 =TEXT(A2 - A1, "hh:mm:ss")
,例如,00:42:17
.
这是我的 2 部分问题的第 1 部分。
我想对 A
列求和。我得到错误的答案。我知道它会很简单,但不幸的是我错过了它。
第 2 部分是然后我想使用 A3
时间在进站时添加的燃料量来获得每小时的平均燃料消耗量,再次得到错误的答案。
您想将时间捕获为数字而不是测试,因此您可以减去时间然后转换回时间。
Sub Test()
Dim e As Double
Dim s As Double
s = (TimeValue(Time)) 'Get Current Time as a number
Debug.Print s
e = s + (30 / (86400)) 'Add 30 seconds for testing you'd repeat the formula for s
Debug.Print Format(e - s, "hh:mm:ss") 'Print out as time.
End Sub
示例输出:
0.840752314814815
00:00:30
您应该可以根据自己的需要进行调整。
我正在使用电子表格 运行 我们在耐力赛车比赛中的燃油策略。
我有两个按钮可以将时间添加到两个单元格中,比如单元格 A1
中的坑,单元格 B1
中的坑。两个单元格的按钮单击事件都是 ActiveCell.Offset(0, 2).Value = Time()
,针对每个单元格进行寻址,并且单元格文本将为 6:33:23 AM
,例如。
在第 3 个单元格 A3
中,我使用了下面的 =TEXT(A2 - A1, "hh:mm:ss")
,例如,00:42:17
.
这是我的 2 部分问题的第 1 部分。
我想对 A
列求和。我得到错误的答案。我知道它会很简单,但不幸的是我错过了它。
第 2 部分是然后我想使用 A3
时间在进站时添加的燃料量来获得每小时的平均燃料消耗量,再次得到错误的答案。
您想将时间捕获为数字而不是测试,因此您可以减去时间然后转换回时间。
Sub Test()
Dim e As Double
Dim s As Double
s = (TimeValue(Time)) 'Get Current Time as a number
Debug.Print s
e = s + (30 / (86400)) 'Add 30 seconds for testing you'd repeat the formula for s
Debug.Print Format(e - s, "hh:mm:ss") 'Print out as time.
End Sub
示例输出:
0.840752314814815
00:00:30
您应该可以根据自己的需要进行调整。