次のマクロを実行すると、「実行時エラー '1004'：アプリケーション定義またはオブジェクト定義エラー」が表示されます。

Question

私はこれで初心者です。私はそれが構文に関連していると確信しています。助けをありがとう！奇妙なことは、この同じコードが同じブックの別のモジュールで動作していることです。私はそれをこのマクロにコピーし、単にセル参照を変更しました。

デバッグは... "（" 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

次の2つの空白のためのあなたの式で二重引用符を表示するために4重引用符をする必要はありません。 "=IF(ISBLANK(N2),"""",INDEX(Historical!$C:$C,MATCH(N2,Historical!L:L,0)))"