используя Application.WorksheetFunction.MRound и Cells.Formula

Question

Я пытаюсь написать формулы Excel, используя Cells.Formula и Application.WorksheetFunction.MRound

Я хочу оставить формулы в ячейках, но он оставляет только значения, а не формулы.

Как мне оставить формулы в клетках?

Answer 1

Функции Application.WorksheetFunctions не предназначены для помещения в ячейки, но будут выполнять вычисление функции рабочего листа в VBA.

Если вы хотите поместить формулу в ячейку, вам нужно использовать одно из свойств формулы, например

Range("A1").Formula ' or
Range("A1").FormulaR1C1

См. этот вопрос для примера обоих.

Answer 2

Вместо cell.value = Application.WorksheetFunction.MRound используйте cell.formula = "=MRound". И.Е. поместите формулу так, как вы пишете ее в ячейку, в виде строки.