Глюки условного форматирования

[ANB]

Гуру Excel, подскажите как быть.
Столкнулся с проблемой, некоторые документы стали нереально тормозить.
В результате поисков и экспериментов пришел к выводу, что проблема в условном форматировании.
Прилагаю простой тестовый файл. (Test.xlsm).
После выполнения простого макроса по копированию данных, Excel становится практически мертвым.
Полученный файл (Test2.xlsm) - уже имеет определенные проблемы с открыванием и при работе с ним.
Тормоза растут в геометрической прогрессии при увеличении числа циклов выполнения макроса.
Так и должно быть, или это глюки самого Excel и нужно общаться по этому поводу с техподдержкой мелкософта с целью устранения бага.
Excel 2007.

[Watcher_1]

Такой вариант пойдет?

Sub Test1()
'
' Test1 Макрос
'
  List = Array("", "1", "2", "3", "4")
  Application.ScreenUpdating = False
  Application.Calculation = xlCalculationManual
  For n = 1 To Sheets("4").Cells(20, 1)
    DoEvents
    Application.StatusBar = n
    For d = 2 To 4
      DoEvents
      Sheets(List(d)).Range("A1:K11").Cells.Formula = Sheets(List(d - 1)).Range("A1:K11").Cells.Formula
    Next d
  Next n
  Application.Calculation = xlCalculationAutomatic
  Application.ScreenUpdating = True
End Sub