使用VBA(Excel)将整数除以一次

时间:2009-04-23 17:43:33

标签: excel-vba vba excel

我试图将整数之和除以[h]:mm:ss之和得到[s]。我这样做是因为这种疯狂的扭曲。

temp = Split(Format(Range("D" & rInx).Value, "hh:mm:ss"), ":", -1, vbTextCompare)
answerDelay = CInt(temp(0)) * 3600 + CInt(temp(1)) * 60 + CInt(temp(2))

因为这对我来说似乎很奇怪,我想我会把它放在那里让你的大脑看一看并告诉我一个更好的方法。

这是工作表中公式的结尾,简称

range(B1)=838
range(C1)=26:38:44
range(D1)=range(C1)/range(B1)

答案是109秒。

它确实有效,因为我在这里工作,我只是不满足于我的解决方案。

你有更好的解决方案吗?

提前谢谢! 克雷格

2 个答案:

答案 0 :(得分:3)

Excel将时间保持为一天的分数,即24小时= 1.0。要转换为秒,只需乘以24 * 60 * 60。

答案 1 :(得分:0)

您可以使用TimeSpan将时间转换为秒,然后将其除以。

我没有在C#中测试过它,但是这样:

var seconds = new TimeSpan(26, 38, 44).Seconds;

这是你的意思吗?