Как запретить любой пересчёт в ячейках рабочего листа?

вручную:

Перейдите в модуль нужного рабочего листа. Затем в меню Вид (View) выберите Окно свойств (Properties Window) и установите значение свойства EnableCalculation как False.

программно:

Лист1.EnableCalculation = False

Worksheets(1).EnableCalculation = False

Worksheets("Лист3").EnableCalculation = False

Предполагается, что:

Лист1 - это кодовое/программное имя рабочего листа
1 - это индекс рабочего листа
Лист3 - это имя рабочего листа

Не забывайте, что полностью запретить пересчёт в ячейках листа, можно только если у Вас установлен автоматический режим пересчёта.