루프 내에서 수식의 섹션을 참조하는 동안 VBA가 끊어졌습니다.

Question

현재 루프 내에서 다음 조건을 포함하는 루프를 사용하고 있습니다.

For Each Cell In Range("A3:A1000").Cells 
    If Cell.Value = "Existing" And IsEmpty(Cell.Offset(0, 7).Value) Then 
    Cell.Offset(0, 7).Value = "X" 
    Cell.Offset(0, 5).Formula = "=VLookup(RC[-1],Customers!R2:T5000,2,FALSE)" 
    Cell.Offset(0, 6).Formula = "=VLookup(RC[-2],Customers!R2:T5000,3,FALSE)" 
    End If 
Next Cell 

수식은 셀에 추가 할 때마다 하나 개의 예외와 함께 잘 작동 번째 값 고객이되는 2 $! $ 2 "T5000". 왜 이런 일이 일어나는 지 아는 사람이 있습니까?

Answer 1

.Formula 및 .FormulaR1C1 속성을 혼합하고 각 속성에 대해 올바른 구문을 사용했습니다. 다음 줄을 사용해보십시오.

Cell.Offset(0,5).FormulaR1C1 = "=VLookup(RC[-1],Customers!R2C18:R5000C20,2,FALSE)" 
Cell.Offset(0,6).FormulaR1C1 = "=VLookup(RC[-2],Customers!R2C18:R5000C20,3,FALSE)"