VBA下一步无需为

有人能告诉我下面的if-statement有什么问题吗。它给了我一个错误“下一个没有For”，但正如我们所看到的，在下一个之前有一个For。如果我从代码中删除第二条If语句，它就可以正常工作。有什么问题吗

With Blad6
'Loop over the array and perform the search

For x = 1 To UBound(arr)

   Set cl = rng.Find(arr(x, 1), LookIn:=xlValues)
    If Not cl Is Nothing Then
        If arr(x, 1).Offset(0, 6) = cl.Offset(0, -4) Then
            Worksheets("Sheet").Cells(n, 1) = cl
            Worksheets("Sheet").Cells(n, 2) = cl.Offset(0, 2)
            n = n + 1
    End If

Next

---

以

结束您缺少一个结束如果-您需要两个，每个

如果

一个。如果您不确定如何排列

如果…结束如果

块和其他块构造，可以使用。