我是一个VB初学者，自己写了一个宏如下：Sub 宏1()
If Sheet1.Cells(84, 3) = "转入" Then Sheet1.Cells(1, 1) = 1
ElseIf Sheet1.Cells(84, 3) = "存款" Then Sheet1.Cells(1, 1) = 1
Else: Sheet1.Cells(1, 1) = 1
End If
End Sub
运行这个宏时总出现“编译错误 else没有if”请问一下问题出在哪？谢谢