Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 1 860

/ вопрос открыт /

Здравствуйте, уважаемые эксперты!
У меня происходит выгрузка из БД в Excel через E:=CreateOleObject('Excel.Application').
В конце выгрузки там также генерятся макросы на auto_open, Activate Worksheet и определяются макросы на нажатие клавиш f7, f8, f9. В конце еще запускается процедура auto_open (в которой как раз определяются процедуры для клавиш f7, f8, f9).
все работает хорошо. только одно маленькое "но" - в конце выполнения программы почему то открывается VBA-редактор. Хотя я его нигде не вызываю.
Просьба помочь мне в решении вопроса: на кой он запускается и как сделать чтоб он не появлялся?
Пересмотрела множество аналогичных примеров, но нигде о таком побочном эффекте ничего не указано.

vea Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задала: vea (статус: Посетитель)
Вопрос отправлен: 28 августа 2008, 20:36
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 4; последнее сообщение — 29 августа 2008, 01:29; участников в обсуждении: 2.
vea

vea (статус: Посетитель), 28 августа 2008, 23:52 [#1]:

я вырезала в итоге в программе практически все кроме вот этого:

procedure TForm1.Button1Click(Sender: TObject); //Процедура выгрузки в excel
var
LineNum: variant;
E:variant;
begin
E:=CreateOleObject('Excel.Application');
E.Workbooks.Add; //Создаем новую книгу Excel
//добавляем макрос для обработки события открытия Книги
LineNum := E.ActiveWorkbook.VBProject.VBComponents.Item(1).CodeModule.CreateEventProc('Open', 'Workbook');
LineNum := LineNum + 1;
E.ActiveWorkbook.VBProject.VBComponents.Item(1).CodeModule.InsertLines(LineNum,' MsgBox "Open Workbook" ');
//Делаем Excel видимым (иначе он работает в фоновом режиме)
E.visible:=true;
end;


и этот эффект остался. Этот метод создания макроса для excel из delphi я взяла из какой то статьи, но про открытие VBA там не было ни слова. Может кто то мне скажет, что же тут может быть не так?
Вадим К

Вадим К (статус: Академик), 29 августа 2008, 00:19 [#2]:

открылся - ну закройте и всех то делов.
Галочка "подтверждения прочтения" - вселенское зло.
vea

vea (статус: Посетитель), 29 августа 2008, 01:18 [#3]:

а какой смысл в его открытии?
Вадим К

Вадим К (статус: Академик), 29 августа 2008, 01:29 [#4]:

Ну наверное, что бы добавить макрос. политика МС местами весьма туманна.
Галочка "подтверждения прочтения" - вселенское зло.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 16:33
Выполнено за 0.03 сек.