Добавление функции в существующую формулу

вы можете заменить в 2 шага, без ручного редактирования:

1-поиск и замена = с =IFERROR(

(это вызовет много ошибок)

2-поиск и заменить конец строки с ,0%)

Введите следующие 2 нажатия клавиш для конца строки:

Управление-M

Control-J

обратите внимание, что вы не увидите ни одного символа на входе, но он будет работать.

Я обычно использую regex надстройка работать с текстом с большей гибкостью, чем встроенный поиск / замена.

Он предоставляет функции поиска / замены, а также функции листа с регулярными выражениями.

в вашем примере вам нужно

• ищут: =(.*)
• заменить на: =iferror(,0%)

обратите внимание, что эта надстройка не имеет возможности заменить только в выборе, поэтому нужно позаботиться чтобы написать конкретное достаточно поискать выражение.

Допустим, у нас есть группа ячеек, которые мы можем редактировать en-mass:

Выделяем ячейки и запускаем этот короткий макрос:

Sub FixFormula()
'
'   hi-light the cells you wish to process
'
    Dim r As Range, rngF As Range, s As String

    Set rngF = Selection.Cells.SpecialCells(xlCellTypeFormulas)
    For Each r In rngF
        s = "(" & Mid(r.Formula, 2) & ")"
        r.Formula = "=IFERROR(" & s & ","""")"
    Next r
End Sub

и все формулы будут преобразованы из:

=A1/B1

to:

=IFERROR((A1/B1),"")