Определяемая приложением или возражаемая ошибка отображается только с If Vlookup Statement

Question

Итак, у меня проблема с моим скриптом, который заполняет формулу до последней строки столбца. Он работает по большей части, за исключением случаев, когда он входит в мою функцию if.

Sub vlookups()
'
' vlookups Macro
'

'
    Dim LastRow As Long
    LastRow = Range("A" & Rows.Count).End(xlUp).Row
    Range("C2:C" & LastRow).Formula = "=VLOOKUP($A2,'Refined Raw'!$A:$AH,2,false)"
    Range("E2:E" & LastRow).Formula = "=VLOOKUP($A2,'Refined Raw'!$A:$AH,3,false)"
    Range("G2:G" & LastRow).Formula = "=VLOOKUP($A2,'Refined Raw'!$A:$AH,4,false)"
    Range("I2:I" & LastRow).Formula = "=VLOOKUP($A2,'Refined Raw'!$A:$AH,5,false)"
    Range("K2:K" & LastRow).Formula = "=IF(VLOOKUP($A2,'Refined Raw'!$A:$AH,6,false)=0,'',VLOOKUP($A2,'Refined Raw'!$A:$AH,6,false))"


End Sub

Это работает нормально на первых 4 диапазонах просмотра, однако, когда он попадает в последний из них с IF (VLOOKUP, он показывает ошибку. Я не слишком хорошо разбираюсь в VBA, поэтому я не уверен, что может быть причиной этого выпуск.

Любая помощь?

Answer 1

Вам нужно удвоить кавычки внутри формулы:

 "=IF(VLOOKUP($A2,'Refined Raw'!$A:$AH,6,false)=0,"""",VLOOKUP($A2,'Refined Raw'!$A:$AH,6,false))"