отключить автоматическое вычисление формул на отдельных листах

[roborrr]

можно ли отключить автоматическое вычисление формул на всех листах кроме одного (название листа например sheet1). и еще можно ли отключить автоматическое вычисление формул только на одном листе.

[SaLoKiN]

макрорекордер во что накалякал

Sub Макрос1()
'
' Макрос1 Макрос
'

'
    With Application
        .Calculation = xlManual
        .CalculateBeforeSave = False
    End With
End Sub

но эт только для всего...на листе не катит(

[roborrr]

спасибо, но мне нужно на отдельных листах

[kuklp]

Sheets(1).EnableCalculation = 0

[roborrr]

Сообщение от kuklp

Sheets(1).EnableCalculation = 0

это майо оплошность, Sheets(1)-название листа, имя листа или номер листа? когда то вы угадали что, русский язык не родной мой язык.

[kuklp]

Это номер листа. Можете подставить туда нужное имя:

Sheets("sheet1").EnableCalculation = 0

[staniiislav]

Честно сказать стремная функция EnableCalculation , обычный пользователь потом очень долго будет искать как включить пересчет формул для листа (и не факт что найдет).
Все конечно зависит от задач, я недавно столкнулся с этой функциейEnableCalculation , но я моих вычислений она не совсем подошла, и я при вычисления отключал полностью вычисления в книгах, и пересчитывал только нужный мне диапазон, после выполнения макроса включал пересчет для всех книг. НО все зависит от структуры данных и хотелки...

[kuklp]

Нормальная функция. А дров наломать можно чем угодно, если не знать, как пользоваться.
Включается так же, как и любые другие события:

Sheets("sheet1").EnableCalculation = -1

[roborrr]

Спасибо staniiislav, что поострил мое внимание, как обратно включить EnableCalculation и конечно спасибо kuklp за нужный ответ