“编译错误：预期：语句结束”

当试图运行一段包含以下if语句的代码时，我得到一个编译错误：Expected：这一行的语句结束Elself IsArray(rng(J))Then 。

 If IsObject(rng(J)) = True Then TempX = rng(J).Rows.Count TempY = rng(J).Columns.Count Elself IsArray(rng(J))Then TempX = UBound(rng(J), 1) TempY = UBound(rng(J), 2) End If 

现在尝试了一段时间，但似乎无法使其工作。

Answer 1

修复Elself错字 ，并将End If添加到最后（换行）：

 If IsObject(rng(J)) = True Then TempX = rng(J).Rows.Count TempY = rng(J).Columns.Count ElseIf IsArray(rng(J)) Then TempX = UBound(rng(J), 1) TempY = UBound(rng(J), 2) End If 

注意：你在技术上不需要= True位，你可以把它留在If IsObject(rng(J)) Then 。

Answer 2

自己应该用ElseIf（字母I不是L）