Обновить отображение диапазона, когда ScreenUpdating False

Question

Есть ли способ обновить отображение только определенного диапазона ячеек из VBA, когда ScreenUpdating = False?

То, что я имею в виду следующее:

Application.ScreenUpdating = False 
Application.Calculation = xlCalculationManual 

Range("A1").Calculate 
Range("A1").SomeFunctionThatRefreshesThis 

...

Карл

Answer 1

Если ScreenUpdating установлено значение ложно, то обновление не будет отображаться до тех пор, пока ScreenUpdating установлено значение True. Единственный способ сделать это так, как вы хотите, - использовать свойство ScreenUpdating более мелким способом. Например:

Application.Calculation = xlCalculationManual 

Range("A1").Calculate 
Application.ScreenUpdating = False 
Range("A1").SomeFunctionThatRefreshesThis 
Application.ScreenUpdating = True 
Application.ScreenUpdating = False 
... 

Answer 2

Вы можете рассчитать определенный диапазон ячеек, используя RangeCalc надстроек в от Чарльза Уильямса (Descision модели)

http://www.decisionmodels.com/downloads.htm#addload

Установка ScreenUpdating уровня приложения будет, конечно, не позволяйте вам видеть изменения, хотя, но без него установлено значение false, общий эффект должен быть аналогичным.