Написать формулу в Excel VBA

Question

Я пытаюсь написать формулу в Excel VBA.

Это мой код:

Dim Formula as Range
Dim Number as Integer

Number = 1

Formula.formula = "=MAX(IF(LEFT(B7:B250,1)= & Number &, B7:B250))"

Это дает синтаксическую ошибку.

Answer 1

Вам не хватает некоторых кавычек:

"=MAX(IF(LEFT(B7:B250,1)=" & Number & ",B7:B250))"

Кроме того, это формула массива, поэтому используйте .FormulaArray вместо .Formula.