привет, вопрос:
Мне необходимо при открыти XLS файла перехватить это событие
и стандартный диалог подменить своим.
Куда копал-создал книгу с
Private Sub Workbook_Open()
' тут какой то мой код
endsub

Далее книгу эту сохранил в XLSTART каталог, отрабатывает только один раз на запуске
Екселя.. Мне же надо чтоб эта Workbook_Open дергалась каждый раз
при открытии нового файла( из уже открытого екселя)

Кхе-кхе, тему неудачно назвал..

К сожалению через Implements не получится то что мне нужно..
Если бы было событие что то вроде AppEvents_Before_Open
А так- увы :-(

Дополню немного, для ворда cделал гибрид автозагружаемого шаблона с
переопределением событий через Implements
В автозагружаемом шаблоне создал
SUB FILEOPEN()
Т.е. при File->Open отрабатывает мой код,
Вот для екселя чего то подобного не могу нарыть

Так, сначала подробней
из внешнего приложения открываю Excel по Createobject()
мне нужно сделать перехват открытия документа, вместо стандартного
диалога открытия документа подсунуть свой.
Ну а что касается Implements, то по ссылке именно это и есть только "за кадром"
Переопределение событий дерганьем за открытые интерфейсы и раннее связывание..

Наверное я действительно не понятно вопрос поставил..
Перехват нужен открытия файлов ( не одной книги )

Попробую сделать так.. Хех и меню прикрывать тогда придется..
Досадно, что с вордом трюк прошел на ура..
создал sub FileOpen ,подсунул туда свой код и все..
Спасибо, будем пилить :)

Вариант от KL (XL) и ваш пример- не совсем то, что мне нужно.
Мне надо каким то способом изменить поведение Екселя..
При выборе пункта File->Open поймать это событие и стандартное диалоговое окно
заменить своим.. в последнем посте KL (XL) вроде бы меня понял...

2 Lena_#####
Да- в самую точку, спасибо огромное :)

Еще вопрос в продолжение темы..
Пробовал 2 варианта работы с этим файлом.

1) Перед запуском Excel программно понижаю в реесте уровень безопасности,
выгружаю этот XLS из своего EXE и открываю
myApp.Workbook.open(....)
Все работает отлично, получается открывать разные файлы и сохранять обратно в базу.
Но если сразу пытаешься сохранить "этот файл", вылазит неприятное окошко
с сообщением "Предупреждение о конфиненциальной ин-ции, документ содержит макросы, ActivX"
и т.п.
DisplayAlerts=False не помогает.

2) Пробовал копировать этот файл перед стартом Excel в XLSTART, после этого
myApp.Workbook.Add() - не открываю его. Тут я понимаю он сам должен
подхватываться екселем..??
Но почему то отрабатывает через раз или вобще не отрабатывает.
Может это связано с модификацией панели "Standart"?? Появляется в EXCEL файл
Excel11.XLB

Ну и вопросы:
1) Можно ли погасить окно с предупреждением см. п.1
2) Что еще нужно, чтоб файл лежащий в XLSTART подхватывался..

PS Ногами просьба не пинать, ну не спец я в офисах :)