VBA，如果跳过单元格

Question

我想遍历我的范围并加入逻辑，如果B2：B100为“否”，则跳过。

原始代码：

 Dim cell As Range
    For Each cell In Range("A2:A100")
        FilePaths.Add cell.Value
    Next cell

尝试：

If cell.Range("B2:B100") <> "Yes" Then

不确定下一步要去哪里。我想转到A列中的下一个单元格，或继续返回A列。

Answer 1

使用Offset在给定的行和/或列相对于引用位置的偏移处指向Range

Dim cell As Range
For Each cell In Range("A2:A100")
    If cell.Offset(0, 1).Value2 <> "NO" Then FilePaths.Add cell.Value2
Next cell