В связи с недавним обновлением в Excel (версия 1912) мне пришлось написать сценарий VBA, который будет редактировать все формулы в книге, в зависимости от версии сборки Excel. Сценарий, который я написал, работает, но только для указанного столбца. Мой сценарий:
Sub Convert()
Dim Cell As Range
For Each Cell In Range("D2:D" & Cells(Rows.Count, "D").End(xlUp).Row)
If Left(Cell.Value, 8) = "zFormula" Then
If Application.Build > 12026 Then
Cell.Formula = "=" & Replace(Cell.Value, "zFormula", "")
Else: Cell.Formula = "=" & Replace(Cell.Value, "@", "") & Replace(Cell.Value, "zFormula", "")
End If
Else
End If
Next
End Sub
Мне нужен код для поиска по всей книге, и где бы он ни находил «zFormula» в начале ячейки, он должен затем выполнить приведенный выше код.
Пожалуйста, кто-нибудь может помочь мне изменить код для работы со всей книгой