编译错误期望的函数或variables

我是新的，并试图学习VBA。 当我在代码中input时，我得到编译错误预期的函数或variables。

是关于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 

Answer 1

这个错误也会发生，当一个Sub被称为相同的variables（即在一个你有循环迭代“a”，而另一个子被称为“a”）。

这给出了一个适合你的描述的错误。

问候

Answer 2

有可能使你的代码以两种不同的方式失败：

1. 在D10中放置一个非常大的值
2. 在D10中放置一个文本值

这将导致溢出错误或types不匹配错误。

Answer 3

我知道这是前一阵子被问到的，但是当我在工作表中创build一个Sub名称与工作表名称相同的Sub时，我得到了同样的错误。

不幸的是，当这种情况发生的时候，编译并没有强调错误。 该错误仅在运行时出现。 此外，违规行不突出，这使得有点难以find。

改变子名解决了它。