Excel：创build新行并插入

我正在寻找能够通过列A（时间）的Excelmacros，并创build一个新的行，每个整数应该是。 在创build新行之后，需要为该新行插入列D和E的值。 该行也应该突出显示。 最后，所有突出显示的行应该被隐藏（这可以通过按单元格颜色过滤来完成）。

我要提出的最大的问题是何时插入一个新的行，因为它们之间的行数不总是相同的。 我想过比较相邻行中的单元格，但我不确定如何做到这一点。

下面是一个图像，以帮助解释我需要什么。 （减去隐藏的行） Image Example

Answer 1

这里是你的“最大的问题”的代码….我不知道什么math你想要的“插值”部分：

 Sub Insert_whole_Number_row() C = 1 R = ActiveCell.Row If Cells(R, C) = "" Then Exit Sub Do Until Cells(R, C) = "" If Int(Cells(R, C)) <> Int(Cells(R + 1, C)) Then Rows(R + C).Insert R = R + 1 Cells(R, C) = Int(Cells(R + 1, C)) Range(Cells(R, C), Cells(R, C + 5)).Interior.ColorIndex = 6 End If R = R + 1 Loop MsgBox "Done...." End Sub 

Answer 2

我想这是你想要的。 不是VBA解决scheme，而是Excel

1. 用你想要使用的整个数字值（单元格'E3'和下面）
2. 查找最接近的数字index=MATCH(E3,$B$3:$B$105)
3. 获取上一个和下一个t值t1=INDEX($B$3:$B$105, $F3)和t2=INDEX($B$3:$B$105, $F3+1)
4. 获取前一个和下一个x值x1=INDEX($C$3:$C$105, $F3)和t2=INDEX($C$3:$C$105, $F3+1)
5. 插值x值x=FORECAST(E3,I3:J3,G3:H3)