Имеет #REF!ошибка уничтожила оригинальную формулу, так что она потерялась навсегда?
Да! Вы не можете отменить ее.
Однако, если вы ищете простой способ сохранения формул, перед удалением книги, к которой они относятся, вы можете добавить знак '
перед каждой формулой.Таким образом, формулы будут сохранены как текст, и вы избежите #REF!:
Public Sub AllFormulasToText()
Dim myCell As Range
For Each myCell In ActiveSheet.UsedRange
If myCell.HasFormula Then myCell.Value = "'" & myCell.Formula
Next myCell
End Sub