2015-11-03 165 views
0

當試圖運行包含以下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 

已經嘗試了一段時間,但似乎無法使其工作。

+2

你錯過了一個'結束if' ....更換 – findwindow

+0

對不起,忘了包括,但代碼卻原來有一個'結束if'。 – youjustreadthis

+2

這是'Elself'上的拼寫錯誤,它應該是'ElseIf'(大寫「i」)。 – BruceWayne

回答

3

修復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

3

的Elself應與elseif的(字母I不L)

相關問題