Не уверен, что я полностью понимаю вопрос, но вы можете поменять тип формулы ячейка / диапазон, используя комбинации методов ниже
Sub test()
With Sheet1
Set Rng = .Range("A1")
'method1
Formula = Rng.FormulaR1C1
Rng.FormulaR1C1 = Formula
'method2
Formula = Rng.FormulaR1C1
Rng.Formula = Formula
'method3
Formula = Rng.Formula
Rng.Formula = Formula
'method4
Formula = Rng.Formula
Rng.FormulaArray = Formula
End With
End Sub