Конфликт имен при чтении из Ексель

Здравсвуйте,
Читаю данные из ексель, встречаются файлы при открытии которых возникает ошибка:  "Имя не должно совпадать со встроенным именем".
И предлагается ввести новое имя, старое - _filterDatabase

Ошибка возникает при выполнии строки:
        WB         = Excel.Workbooks.Open(пПолноеИмяФайла);
На форуме есть подобные темы, но решения там нет: v8: Конфликт имен: Имя не должно совпадать со встроенным именем в Excel

Собственно дело в автофильтре, как я понял, если добавить в книгу макрос при открытии удаляющий автофильтр, то все ок. Но это неудобно, можно ли как то в 1с до открытия книги выполнить код аналогичный макросу:

Private Sub Workbook_Open()

Dim KolListov As Integer
Dim KolImen As Integer

KolListov = Sheets.Count

    For i = 1 To KolListov
        Sheets(i).AutoFilterMode = False
    Next


    KolImen = Names.Count

    For i = 0 To KolImen - 1

        If InStr(Names(KolImen - i).Name, "_FilterDatabase") <> 0 Then
            Names(KolImen - i).Delete
        End If
    Next

End Sub