|
Вопрос # 1 860/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
У меня происходит выгрузка из БД в Excel через E:=CreateOleObject('Excel.Application').
В конце выгрузки там также генерятся макросы на auto_open, Activate Worksheet и определяются макросы на нажатие клавиш f7, f8, f9. В конце еще запускается процедура auto_open (в которой как раз определяются процедуры для клавиш f7, f8, f9).
все работает хорошо. только одно маленькое "но" - в конце выполнения программы почему то открывается VBA-редактор. Хотя я его нигде не вызываю.
Просьба помочь мне в решении вопроса: на кой он запускается и как сделать чтоб он не появлялся?
Пересмотрела множество аналогичных примеров, но нигде о таком побочном эффекте ничего не указано.
 |
Вопрос задала: vea (статус: Посетитель)
Вопрос отправлен: 28 августа 2008, 20:36
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 4; последнее сообщение — 29 августа 2008, 01:29; участников в обсуждении: 2.
|
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 (статус: Посетитель), 29 августа 2008, 01:18 [#3]:
а какой смысл в его открытии?
|
|
Вадим К (статус: Академик), 29 августа 2008, 01:29 [#4]:
Ну наверное, что бы добавить макрос. политика МС местами весьма туманна.
Галочка "подтверждения прочтения" - вселенское зло.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|