IF-语句编译错误

Question

我收到编译错误消息 - End If without If Block .谁能说出我的代码出了什么问题：

Sub Find()
Dim i As Integer
Dim j As Integer
Dim k As Integer
For i = 2 To 107
For j = 4 To 6
    For k = 2 To 573
    If InStr(Sheet2.Cells(k, 7), Sheet1.Cells(i, j)) <> 0 Then Sheet2.Cells(k, 12) =         Sheet2.Cells(k, 9)
    End If
    Next k
Next j
Next i
End Sub

Answer 1

对于

内联 If 语句，不需要使用 End If。只需删除它，您就可以了，或者将位移动到下一行。

当你有一个多行 if 语句时，你需要使用 End If