Как убить Excel программно

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
valery51
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 03.08.2005 (Ср) 14:00

Как убить Excel программно

Сообщение valery51 » 12.11.2005 (Сб) 14:16

Требуется обращение к Excel, в котором формируется из шаблона форма. После печати Excel нужно закрыть. Книга закрывается, а сам процесс нет. Окна у него нет. Что делать. Текст проблемы ниже.
'Dim objExcel As Excel.Application
'Dim objWorkbook As Excel.Workbook
'Dim objWorksheet As Excel.Worksheet
процедура=======
'Set objExcel = GetObject("", "Excel.Application")
' pl_ProcessID = objExcel.Application.Build
' objExcel.Application.Visible = True
' Set objWorkbook = GetObject(Module1.sDBPath)
' objWorkbook.Application.Windows("Schet_FacturaD.xls").Visible = True
' objExcel.DisplayAlerts = False
' Set objWorksheet = ActiveSheet


objExcel.Quit
objExcel.Application.Quit
Set objWorksheet = Nothing
Set objWorkbook = Nothing
Set objExcel = Nothing
конец

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 12.11.2005 (Сб) 14:57

Нет, тема названа не "Как корректно закрыть Excel", а "Как убить Excel программно"...

Может, всё-таки в консерватории подправить, а?

Где код печати?
Где код закрытия книг?
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас


Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 1

    TopList