當我運行下面的宏時，出現「運行時錯誤'1004'：應用程序定義或對象定義的錯誤。」

Question

我是這個新手。我相信它的語法相關。感謝任何幫助！奇怪的是，我有相同的代碼在同一工作簿中的另一個模塊中工作。我將它複製到這個宏並簡單地改變了單元格引用。

調試突出顯示了開始的代碼行...「Range（」O2：O「& EndRow）」。

Excel宏代碼：

Sub insertsubmissionformulas() 
    ' 
    ' insertsubmissionformulas Macro 
    ' 
    Sheets("Client").Select 
    With ThisWorkbook.Worksheets("Client") 
    EndRow = .Cells(.Rows.Count, "N").End(xlUp).Row 
    Range("O2:O" & EndRow).Formula = "=IF(ISBLANK(N2),"",INDEX(Historical!$C:$C,MATCH(N2,Historical!L:L,0)))" 
    End With 
    ' 
End Sub 

Answer 1

需要四個報價，以顯示你的公式爲空白，而不是兩個雙引號。 "=IF(ISBLANK(N2),"""",INDEX(Historical!$C:$C,MATCH(N2,Historical!L:L,0)))"