编译错误预期函数或变量

0 excel vba

我是新手,正在尝试学习 VBA。当我输入代码时,我得到编译错误预期函数或变量。

是关于activecell的东西,但无法弄清楚。

Sub Testare()
    Dim FilmName As String
    Dim FilmLenght As Integer
    Dim FilmDescription As String

    Range("b10").Select
    FilmName = ActiveCell.Value
    FilmLenght = ActiveCell.Offset(0, 2).Value

    If FilmLenght < 100 Then
       FilmDescription = "Interesant"
    Else
       FilmDescription = "Suficient"
    End If

    MsgBox FilmName & " is " & FilmDescription
End Sub
Run Code Online (Sandbox Code Playgroud)

Art*_*ski 5

当 Sub 被称为与变量相同的调用时也会发生此错误(即,在一个 Sub 中,您有带有迭代器“a”的 for 循环,而另一个 Sub 被称为“a”)。

这给出了符合您描述的错误。

问候