怎么能在某一特定行后面 增加一行 并且补充上时间

bmbxhit

如图所示  数据一共5个字段 采集的数据时间间隔为5分钟，黄色的标注前面是应该是0:50 缺一个数据 现在的需求是想能字段加上一行 并且把时间和link字段补齐， 速度值为空值 求教各位大神应该怎么做！ 具体的文件详情在压缩包里 哪位大神可以帮忙指导一下 thank you。

喝酒吃肉

Sub test()
    Dim lastrow As Long
    Dim time1
    lastrow = Range("A" & Rows.Count).End(xlUp).Row
    Range("F1") = "0:05:01"
        For time1 = 3 To lastrow
            If Range("B" & time1) - Range("B" & time1 - 1) > Range("F1") And Range("B" & time1) < 0.99 Then
                Rows(time1).Insert
                Range("A" & time1) = Range("A" & time1 - 1)
                Range("B" & time1) = Range("B" & time1 - 1) + Range("F1")
                Range("D" & time1) = Range("D" & time1 - 1)
                time1 = time1 + 1
            End If
        Next
End Sub
初步实现了功能，但是不知道各字段的规律是什么，不好写下去。。。