Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBScript и Excel (WorkBooks.Count всегда равен нулю) / 2 сообщений из 2, страница 1 из 1
06.08.2010, 14:08
    #36779329
Diamond1309
Diamond1309
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBScript и Excel (WorkBooks.Count всегда равен нулю)
создаю файл Script.vbs
пишу туда:
Dim ExcelApp
Dim Book, ExcelName
Set ExcelApp= CreateObject( "Excel.Application" )
If ExcelApp.WorkBooks.Count = 0 Then
Set Book = ExcelApp.WorkBooks.Add
Else
MsgBox "Count = " & ExcelApp.WorkBooks.Count
End If
ExcelApp.Visible=TRUE

При каждом запуске ExcelApp.WorkBooks.Count равен нулю, хотя имеются открытые книги Excel.
Что я делаю не правильно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.08.2010, 14:11
    #36779336
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBScript и Excel (WorkBooks.Count всегда равен нулю)
> Автор: Diamond1309
> Что я делаю не правильно?

Каждый раз создаешь новый инстанс екселя. Пробуй сначала получить запущенный екземпляр ексела через GetObject,
если не будет запущенного, тогда открывай новый через CreateObject

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBScript и Excel (WorkBooks.Count всегда равен нулю) / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]