Ожидаемый конец Заявление

Question

Ok, я использовал формулу, которая была предложена, что хорошо работает, должен работать без проблем, но теперь я получаю эту ошибку:

Expected End of Statement

Вот формула

Range("B4").FormulaR1C1 = "=IF(RC[-1]="T",VLOOKUP(RC[7],treatlookup,11,FALSE),VLOOKUP(RC[7],itemlookup,22,FALSE))" 

Не уверен, что происходит, почему это происходит. Какие-либо предложения.

Спасибо,

Answer 1

побег внедренные двойные кавычки ("T") путем их удвоения (""T""):

Range("B4").FormulaR1C1 = "=IF(RC[-1]=""T"",VLOOKUP(RC[7],treatlookup,11,FALSE),VLOOKUP(RC[7],itemlookup,22,FALSE))" 
             ^^^ 
             | 
             Here 

Excel пытается спариваться открытие цитаты на "=IF со следующей двойной кавычки находит, что находится на "T", и эта часть ("=IF(RC[-1]=") не является действительным заявлением. Удвоение их говорит Excel рассматривать их отдельно, что позволяет им правильно встраиваться в формулу.

(ошибка будет выделен для вас, когда вы получаете сообщение, если вы посмотрите на коде, это указывающее, вот как я это заметил.)