Как мне ввести текст и формулу в ячейку через VBA?

Question

Я озадачен ,,,

Вот две строки, нижняя работает ОЧЕНЬ так, как я ожидаю. В верхней части нет, либо я получаю синтаксическую ошибку, либо отсутствует ошибка формулы = или: он говорит.

Я знаю, что в данный момент нижняя имеет 5x ", а топон - 4x", однако, когда я добавляю 5-й я получаю синтаксическую ошибку.

If i <= taskNo Then VS.Range(ColumnLetter(i + 18) & 7).Formula = "=Calculations!" & ColumnLetter(i + 2) & 53 & ""& test""

    If i > taskNo Then VS.Range(ColumnLetter(i + 18) & 7).Formula = "=Calculations!A1 & "" test"""

Есть идеи?

Answer 1

Чтобы ваша первая формула производила результат, аналогичный первому, используйте

"=Calculations!" & ColumnLetter(i + 2) & 53 & " & "" test"""

для i = 1, она выдаст

=Calculations!A53 & " test"