Запуск Excel?

user_grp
Дата: 09.01.2012 11:19:28
Как узнать из VBA запушен ли на локальном компьютере Excel или нет? Если он не запушен, как его запустить из VBA!

Должно быть что-то вреде этого:
If Excel запушен на локальном компьютере Then
	Выполнить код
Else (т.е. Excel не запушен на локальном компьютере)
	Выполнить запуск Excel
	Выполнить код
End if
Программист-Любитель
Дата: 09.01.2012 11:22:21
GetObject
CreateObject
F1
EvAnd
Дата: 09.01.2012 11:39:02
user_grp, вот аналогичный алгоритм работы с Word:
Private Sub MyDoc() 
Dim objWord As Word.Application 
DoCmd.Hourglass True
'При возникновении ошибки перейти на следующую строку. 
On Error Resume Next
'Попытка установить ссылку на Word, который уже открыт. 
Set objWord = Get0bject(,  "Word.Application")
' Если истинно, значит, Word не открыт. 
If objWord Is Nothing Then
'Запуск новой копии приложения Word. 
   Set objWord = New Word.Application
'Если истинно, значит, MS Word 8.0 не установлен. 
   If objWord Is Nothing Then
MsgBox "MS Word 8.0 is not installed on your computer" 
   End If 
End If
'При возникновении ошибки перейти к обработке ошибок 
'(Здесь записывается код ErrorHandler)
'Открытие нового документа Word на основе ••блока "Normal.dot".
ObjWord.Documents.Add
'Активизация Word. 
objWord.Activate
'Отобразить Word для пользователя. 
objWord.Visible = True
     .........
     .........