Excel - изменение формулы ячейки на текст

вопрос

Считайте, что у меня есть:

• В ячейке A4 она содержит формулу = Sum (A1: B3) + A3 / B2.
• Как извлечь эту формулу в ячейку A6 в виде строки текста?
  • То есть ... Я хочу, чтобы отображалась ячейка A6 = Сумма (A1: B3) + A3 / B2
  • Используя Control + ~, я могу просмотреть эту формулу в электронной таблице.
  • Но это только в режиме просмотра. Нажатие Control + ~ вернется в нормальное состояние.
  • Кроме того, я попытался поместить «в начало» и вставить формулу в одну ячейку ... но это не применимо в VBA (написание Marco).
  • VBA захватит сценарий, как показано ниже

 ActiveCell.FormulaR1C1 = " '= SUM (A1: B3) + A3 / B2" 

*

• • Обратите внимание, что формула в ячейке 6 может быть = A3-B2 + A1 (не = SUM (A1: B3) + A3 / B2)
  • Использование Маркоса для запуска перезапишет новую формулу: = SUM (A1: B3) + A3 / B2 вместо = A3-B2 + A1
  • Как использовать функции в Excel или Marcos, чтобы выполнить изменение формулы ячейки в текст.

Решение

Попробуйте с этим макросом:

 Sub DysplayFormula () Range ("A6"). Value = "'" & Range ("A4"). Formula & "" End Sub 

Заметки

Спасибо акварели, за этот совет.