この式をVBAで機能させようとしていますが、 "B2"がステートメントの終わりになるはずです。コードは以下のとおりです。
With Range("J2:J" & LastRow)
.Formula = "=I2/VLOOKUP(A2&"B2", MARM!A:G, 7, 0)"
.Value = .Value
End With
数式が欲しい場合、セルを空のままにするのが0または#N / Aの場合はコードを使用しましたが機能しません。
.Formula = "=IF(VLOOKUP(A2&""B2"",MARM!A:G,7,0)=0,"""",VLOOKUP(A2&""B2"",MARM!A:G,7,0))"
回答:
回答№1は1編集
With Range("J2:J" & LastRow)
.Formula = "=IF(IFERROR(I2/VLOOKUP(A2&""B2"",MARM!A:G,7,0),"""")=0,"""",IFERROR(I2/VLOOKUP(A2&""B2"",MARM!A:G,7,0),""""))"
.Value = .Value
End With