Question

用VBA如何将excel中的时分秒转换成秒数？

我的原本目的是要按照日期加时间进行一一对应自动对账，但是两边的时间会有稍许的偏差（如图中画线部分），现在的想法是将时间转换成秒，通过右边的款项遍历，只要时间偏差在一定时间内，就判定为同项，不知道这思路对不？望大神指导。如果是这样的话就遇到2个问题了
1、将(01:01:03)转成3663该怎么实现？
2、将 (2016/1/20)转成20160102该怎么实现？

Answer 1

[b1] = [a1] * 24 * 3600

[b2] = Application.Text([a2], "yyyymmdd")

自己根据实际情况调整代码中的单元格地址