使用Excel vba计算使用时间和时间的总时间

我必须计算总花费的时间

在这里input图像说明

我附上显示数据格式的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 forumla，如下所示。

= TEXT（G2-F2， “HH：MM”）

如果你想在VBA中做到这一点，那么你也可以在你的VBA代码中使用这样的公式：

time = TEXT（ba，“hh：mm”）

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

最好