Пересчет формул только на одном листе

@Onebody · Регистрация: 03.11.2016

Author24 — интернет-сервис помощи студентам

Доброго времени суток, форумчане!

Столкнулся со следующей проблемой:
На нескольких листах в формулах используются одни и те же пользовательские функции. Необходимо, чтобы при изменении значении в любой ячейке на листе, пересчитывались все формулы, но ТОЛЬКО НА ЭТОМ листе.
Т.е. Application.Volatile не подходит, ибо пересчитывает все формулы на всех листах. Причем при таком пересчете пользовательские функции используют значения ячеек с листа, с которого был инициирован пересчет.

Видится два варианта решения вопроса:
1) Сделать так, чтобы пересчитывались значения только на том листе, на котором произошло изменения ячейки. (пытался использовать Calculate. Возможно как-то криво его прописывал).
2) Сделать так, чтобы пересчитывались все листы, но на каждом листе использовались значения ячеек с этого же листа.

Пожалуйста, помогите с реализацией.

P.S. понимаю, что вопрос, скорее всего, глупый, ибо самостоятельно начал осваивать vba совсем недавно. Гугление не дало результатов.
Выложить Excel'вский файл проблематично, ибо корпоративная тайна.

@KoGG · 03.11.2016, 11:47

В объектный модуль ЭтаКнига вставить:

Visual Basic

1
2
3

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Sh.Calculate
End Sub

@Onebody · 04.11.2016, 11:15 **[ТС]**

А что тогда в самом коде функций прописывать?

Добавлено через 43 минуты
На всякий случай дам ещё одно пояснение: нужный мне эффект достигается, если прописать в функциях Application.Volatile, после чего на каждой странице нажать Shift+F9 (пересчет формул). Но сразу после сохранения документа он Excel пересчитывает формулы на всех страницах, используя значения со страницы, открытой перед сохранением.
Собственно, два варианта, которые я описал выше, актуальны - нужна реализация.

@Onebody 0 / 0 / 0 Регистрация: 03.11.2016 Сообщений: 2
		1
	Пересчет формул только на одном листе 03.11.2016, 11:04. Показов 4882. Ответов 2 Метки нет (Все метки) Доброго времени суток, форумчане! Столкнулся со следующей проблемой: На нескольких листах в формулах используются одни и те же пользовательские функции. Необходимо, чтобы при изменении значении в любой ячейке на листе, пересчитывались все формулы, но ТОЛЬКО НА ЭТОМ листе. Т.е. Application.Volatile не подходит, ибо пересчитывает все формулы на всех листах. Причем при таком пересчете пользовательские функции используют значения ячеек с листа, с которого был инициирован пересчет. Видится два варианта решения вопроса: 1) Сделать так, чтобы пересчитывались значения только на том листе, на котором произошло изменения ячейки. (пытался использовать Calculate. Возможно как-то криво его прописывал). 2) Сделать так, чтобы пересчитывались все листы, но на каждом листе использовались значения ячеек с этого же листа. Пожалуйста, помогите с реализацией. P.S. понимаю, что вопрос, скорее всего, глупый, ибо самостоятельно начал осваивать vba совсем недавно. Гугление не дало результатов. Выложить Excel'вский файл проблематично, ибо корпоративная тайна. 0

@Onebody 0 / 0 / 0 Регистрация: 03.11.2016 Сообщений: 2
	04.11.2016, 11:15 [ТС]	3
	А что тогда в самом коде функций прописывать? Добавлено через 43 минуты На всякий случай дам ещё одно пояснение: нужный мне эффект достигается, если прописать в функциях Application.Volatile, после чего на каждой странице нажать Shift+F9 (пересчет формул). Но сразу после сохранения документа он Excel пересчитывает формулы на всех страницах, используя значения со страницы, открытой перед сохранением. Собственно, два варианта, которые я описал выше, актуальны - нужна реализация. 0