[已解决]时间的合并

Yunyun123

原始数据中小时和分钟是分开的，如下表。 time是分钟和秒数，hour是小时，怎么合并成一个时间，跟期望结果的格式一样，最好秒后面的小数点也能显示出来。  我用&把两列合并，结果是1:0.0199849537037037。

附件中A列的小时和B列的分钟是分开的，需要用VBA把A列和B列合并成D列的样子。

最佳答案

月排行榜 / 总排行榜

砂海

2022-1-26 10:29

D2单元格
1) 清除  内容
2) 设置 格式 为 "h:mm:ss.0"
3) 输入公式 "=A2/24+B2"
完成

跳转到最佳答案楼层

砂海

小时 / 24 + 分钟,
如果 格式 不对 , 重新设置 一下

Yunyun123

砂海 发表于 2022-1-25 15:38
小时 / 24 + 分钟,
如果 格式 不对 , 重新设置 一下

感谢回复。
我试了一下，还是不行。原来小时和分钟是分开的，格式如下：
小时         分钟
1           28:46.9

用小时/24+分钟 结果还等于分钟。。。。
想要的结果是1:28:46.9

vitrel

看起来应该不是很难，
但楼主最好还是上传附件吧，
要不然我怕我创建的情况跟您的不一样，结果就白做了。

Yunyun123

vitrel 发表于 2022-1-25 17:57
看起来应该不是很难，
但楼主最好还是上传附件吧，
要不然我怕我创建的情况跟您的不一样，结果就白做了。

已上传附件，麻烦看一下。

砂海

D2单元格
1) 清除  内容
2) 设置 格式 为 "h:mm:ss.0"
3) 输入公式 "=A2/24+B2"
完成

vitrel

Yunyun123 发表于 2022-1-26 07:53
已上传附件，麻烦看一下。

6楼网友所给的是正解。

或者我再详细解释一下。
我尝试用VBA做，但VBA所得的时间，秒数无法做的有小数（楼主对此有要求），
既然条件格式能实现的，我就不在VBA方向深究了，干脆用条件格式做好了。
Excel中，时间24小时对应数字1，1小时对应的便是1/24=0.0416666666666667
于是便有了6楼网友答案。
问题是6楼的网友解决的，我这里只是做一下补充。

砂海

vitrel 发表于 2022-1-26 12:05
6楼网友所给的是正解。

或者我再详细解释一下。

Vba 时间精度 是小于秒的.
Sub cs()

    Dim t
    t = Timer
    Debug.Print t   '当前时间 (单位:秒)
    Debug.Print Format(t / 60 / 60 / 24, "h:mm:ss.s")

End Sub

Yunyun123

砂海 发表于 2022-1-26 13:36
Vba 时间精度 是小于秒的.
Sub cs()

你的意思是把单元格格式设成"h:mm:ss.s"就可以用VBA做到秒后的小数点了吗？

Yunyun123

vitrel 发表于 2022-1-26 12:05
6楼网友所给的是正解。

或者我再详细解释一下。

感谢回复。我还是要用VBA做的，因为不是直接合并时间，要查找后再合并。我试试用6楼的方式录个宏，看看VBA能不能精确到小数点后面。