excel VBA：如何在包含值的两个单元格之间跳过空白单元格？

我正在设计一个按钮，它可以自动求和C列的值，a列=B列 如图所示： 到目前为止，我只能将A列中的单词=B列的C列中的值复制到E列

代码

Private Sub CommandButton2_Click()

Dim i As Integer, q As Integer

q = 2
For i = 3 To 100


Range("E" & q).Value = Range("b" & 3).Value

If Range("B" & i).Value = "A-RDL1" And Range("c" & i).Value = "OPEN" Then

Range("E" & i).Value = Range("d" & i).Value


End If
Next i


End Sub

问题1是如何跳过空格E9到E17，使数字可以连续？点击按钮后 问题2是否可以自动求和E列中的数字，而不是显示每个数字

---

非常感谢并为我糟糕的英语感到抱歉…

1是的，您可以跳过这些，只需检查单元格值并与空字符串进行比较：Range.Value2=。但我个人更喜欢这样做，以避免误报：LenTrimRange.Value2=0

2是的，你能做到。只需声明一个或两个整数变量，并使用它对值进行连续计数