excel - 使用 Excel vba 计算给定的进出时间所花费的总小时数

Question

我必须计算花费的总时间

enter image description here

我已附上 Excel(img)，其中显示了数据格式。

我尝试了如下一些代码”

For k = 2 To rowval:

    InTime = Rows(k).Cells(1, 6).Value
    OutTime = Rows(k).Cells(1, 7).Value

    If InTime <> "" And OutTime <> "" Then    
        a = Val(InTime)
        b = Val(OutTime)
        time = b - a

对于某些值，不是将 3.516666667 作为输出，而是将 3 作为输出。

任何人都可以帮助我获得适当的输出吗？

Answer 1

我认为您不需要使用 VBA 来进行此计算。您可以在“总小时数”字段中使用基本的 VBA 论坛，如下所示。

=TEXT(G2-F2,"时:分")

如果您想在 VBA 中执行此操作，那么您也可以在 VBA 代码中使用此公式，如下所示:

时间 = TEXT(b-a,"hh:mm")

这里的技巧是包含“hh:mm”，它告诉 Excel 如何格式化结果。

最佳