高级批计算

我有一个与列的表:

开始时间 (A) – 结束时间 (B) – rest (C)

现在我有不同的值在A,B和C,所有这些值都是手动input(我不能改变他们由于限制有一个值或公式)。 现在我想做一个批处理操作

  1. 检查C的值是否低于最小值
  2. 如果是,则将其设置为最小值,并将其距离的一半加到AB的最小值上

示例 – input (最less为01:00

10:00 - 20:00 - 00:00 11:00 - 22:00 - 01:00 09:00 - 19:00 - 00:30 

示例 – 输出

 10:30 - 20:30 - 01:00 11:00 - 22:00 - 01:00 09:15 - 19:30 - 01:00 

我听说过能够在Excel中运行的脚本,但只能find一些例子,而那些less数的例子没有很好的certificate!

在此先感谢您的帮助!

试试这个macros:

 Sub TimeFixer() Dim N As Long, a As Date, b As Date Dim c As Date, e As Date, delta As Date Dim incr As Date incr = TimeSerial(1, 0, 0) N = Cells(Rows.Count, "A").End(xlUp).Row For i = 1 To N If Cells(i, "C").Value < incr Then delta = (incr - Cells(i, "C").Value) / 2 Cells(i, "C").Value = incr Cells(i, "A").Value = Cells(i, "A").Value + delta Cells(i, "B").Value = Cells(i, "B").Value + delta End If Next i End Sub