为什么我会得到一个；“声明结束”；我的Excel VBA代码中的编译错误？

下面是我在VBA中的代码：

Sub Hamza_Starting_to_Learn()

Dim Hamza_Variable As Long

Hamza_Variable = 7

If Hamza_Variable = 7 Then

MsgBox Hamza_Variable & " Is da bomb"

Elself Hamza_Variable > 7 Then

MsgBox Hamza_Variable & " Is da bigger bomb"

Else

MsgBox Hamza_Variable & "We got ourselves a problem here bro"

End If

它在下一行连续给出编译错误“语句结束”：

Elself Hamza_Variable > 7 Then

它高亮显示

，然后

并给出此错误。

尝试以下操作：

Sub Hamza_Starting_to_Learn()

    Dim Hamza_Variable As Long

        Hamza_Variable = 7

    If (Hamza_Variable = 7) Then

        MsgBox Hamza_Variable & " Is da bomb"

    ElseIf Hamza_Variable > 7 Then

        MsgBox Hamza_Variable & " Is da bigger bomb"

    Else

        MsgBox Hamza_Variable & "We got ourselves a problem here bro"

    End If

End Sub

---

您没有用

end sub

结束子程序，因为您正在开始学习，也许您应该熟悉

Select Case

语句：

Option Explicit

Sub Hamza_Starting_to_Learn()

Dim Hamza_Variable As Long

Hamza_Variable = 7

Select Case Hamza_Variable
    Case 7
        MsgBox Hamza_Variable & " Is da bomb"
    Case Is > 7
        MsgBox Hamza_Variable & " Is da bigger bomb"
    Case Else
        MsgBox Hamza_Variable & "We got ourselves a problem here bro"

End Select

End Sub

---

在原始代码中，您编写了

Elself

，而不是

ElseIf

（请注意，在您收到错误的行中键入了混淆的

l

和

I

）。这可能会使VBA感到困惑，而VBA又会给您带来误导性的错误消息

---

（不要感觉太糟糕。）

您的代码末尾缺少1 x

End If

，是否应该有2 x End If？我已经在末尾放了一个，如果，你需要2个

结尾，如果Hamza_变量=7，那么第一个
，第二个
，因为在结尾有另一个
Else
，而不是
ElseIf
，尝试添加第二个变量，看看它是否运行。我已经尝试在if Hamza_变量=7之后添加它，然后在第一个end if之后的末尾添加它。你的意思是说
ElseIf
而不是
Elself
？（请注意，后者是用
l
而不是
I
拼写的）很抱歉，我忘了提及。我以一个结束子结束。仍然给出相同的错误将上述代码粘贴到excel中。它起作用了。我想你在“Elsei”中有一个输入错误如果是的，那是一个输入错误，我刚刚意识到一个愚蠢的错误，这让我在过去的3个小时里挠头。非常感谢你我该怎么做。找不到button@HamzaKhalid我将我的评论作为一个帖子发布，因为您表示这是解决您的问题的方法。您可以通过单击它旁边的复选标记图标来接受它。很高兴我能帮忙！我对此一无所知。我将尝试一下，并观看一些关于这方面的教程。谢谢：）@HamzaKhalid你试过了吗？