Уважаемый Михайло!
Я сталкивался с таким поведением Excel, спрашивал на этом форуме, но не получил дельного совета. То, что, после завершения вывода отчета в Excel, нужно обязательно устанавливать переменные приложения, книг, листов в nothing, иначе Excel останется в памяти и не будет закрываться- ложь.
Ровно таже самая программа, выводящая сложноструктурированный отчет с итогами (функция промежуточные итоги), группирующая данные, прекрасно работает, когда относительно мало данных. Когда же данных много (около 1000 строк по 3 листа + лист с графиками), то после построения отчета, когда пользователь закрывает Excel, она остается в памяти, и когда пользователь открывает "мой компьютер", то он не реагирует, приходится снимать зависшую задачу. Известно, что когда завершается работа программы, ее объектные переменные и так получают значение Nothing. Что касается Excel97, то в отличие от 95, лист, на который пишутся данные должен быть активный, иначе работа программы замедляется, особенно если она не размещена в Excel. Я считаю, что решение проблемы следующее:
1. Все, что относится к Excel, явно описывать, несмотря на то, что есть ссылка на библиотеку Excel - маловероятно, что поможет
2. Данные выгружать на временный лист, затем запускать код форматирования, который должен находиться в Excel - обязательно должно помочь.

Правда? А почему зависает "Мой компьютер"? Не потому ли, что Excel пытается закрыть себя, но получает сообщение об ошибке и так раз за разом?
Я не щелкаю мышью в процессе создания отчета.

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

Уважаемый SergeySV!
Спасибо за желание помочь. Но мой код достаточно большой, я и сам решал много различных проблем, программирую A97 более 5 лет. Боюсь, что Вы не знаете что искать. Только могу сказать: если объект описан как variant, а к нему применяются методы, такие как merge и т.п., то описание объекта как range не приведет к желаемому результату. К тому же у меня все объекты, описаны соответсвующе и передаются в другие процедуры точно также.

Уважаемый Михайло!
Я предполагаю следующее:
Public oApp As Object, wbkReport As Workbook
Sub Test()
Set oApp = GetObject(, "Excel.Application")
oApp.Visible = True
oApp.WindowState = xlMaximized
Set wbkReport = oApp.Workbooks.Add("c:\test.xlt")
'Было
wbkReport.Worksheets(0).range("A1:A2").merge
'Стало
oApp.wbkReport.Worksheets(0).range("A1:A2").merge

End Sub