Добрый день.

На нашей работе активно используем экселовские файлы с макросами, предназначенные для селесктов или инсертов в интерфейсные таблицы.

Изначально на компьютерах был установлен WinXP SP3, Эксел 2003 , и Oracke 9i клиент.
Позднее при помощи автоматического обновления всем сотрудникам поставили Эксел 2007. Пришлось ответсвенную за запуск макросов галочку переставить в нужное положение - все работало.

На днях произошло очерезное обновление Винды и эксела. У кого оно произошли, теперь не могут использовать этот механизм. Трассировка показала, что макросы перестают работать на этой строчке(далее-тестовый пример):

Sub EmpData()

'Declare variables as objects
Dim OraSession As Object
Dim OraDatabase As Object
Dim EmpDynaset As Object

Dim flds() As Object
Dim fldcount As Integer

Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.OpenDatabase("PRWEEKLY", "apps", 0&)
Set EmpDynaset = OraDatabase.CreateDynaset("select * from po.PO_REQUISITION_headers_all prha where segment1 >24900", 0&)
....

Просто ничего не происходит, никакая ошибка не выдается, при продолжении трассировки процедура начинает работать с начала.

Сравнение настроек между машиной без обновления (и на ней макрос работает) и машиной после обновления показало, что отличий нет :(

В чем же дело? :(

Клиента (Oracle 9i) на своей машине переустанавливал - нет эффекта.

Нашлась причина.
Виновато обновление антивируса Касперского. После деинсталляции антивируса Экселовские макросы заработали как надо.
Впереди - разбор настроек Касперского, которым рулят администраторы сети.