使用索引和匹配功能循环if语句

Question

我正在尝试编写VBA代码，但我很茫然。我有一定的调查深度和一定范围的深度。我需要找到调查所属的深度间隔，然后从起始深度中减去调查深度。在下一次调查中，我需要执行相同操作，但还要添加上次调查的其余部分。

数据如下：

基本上我想做的是：

if S1 > d1 and S1 < d2 then s1-d1
if s2 > d3 and s2 < d4 then (s2-d3) + (d2-s1)
' and so on.

但是，调查深度并不总是与深度一致，因此我需要某种匹配函数，以将调查与正确的深度范围相关联。