Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
24.05.2004, 11:15
|
|||
---|---|---|---|
Windows(Blib).Visible = False |
|||
#18+
Привет всем ! Помогите пожалуйста ...кто может :) Отрываю из excel еще один файл и пытаюсь сделать его невидимым в панли задач... Вылазит error Subscript out of range в строке - Windows(Blib).Visible = False коментарю ее все работает нормально,т.е. файл открывается ... а невидимым не хочет быть ... path1 = Workbooks("zt.xls").Sheets("Общие_данные").Cells(3, 3).Value If Not path1 & Blib = "" Then Application.DisplayAlerts = False ActiveWorkbook.UpdateRemoteReferences = False Workbooks.Open(path1 & Blib).RunAutoMacros xlAutoOpen Windows(Blib).Visible = False Else MsgBox theTitle & Chr(10) & Chr(13) & "Выполнение программы прервано", _ theCode, theTitle Workbooks(book).Close SaveChanges:=False End If Jojo® ... |
|||
:
Нравится:
Не нравится:
|
|||
|
24.05.2004, 12:27
|
|||
---|---|---|---|
Windows(Blib).Visible = False |
|||
#18+
Уже разобрался Jojo® ... |
|||
:
Нравится:
Не нравится:
|
|||
|
24.05.2004, 13:51
|
|||
---|---|---|---|
Windows(Blib).Visible = False |
|||
#18+
И что было? ... |
|||
:
Нравится:
Не нравится:
|
|||
|
24.05.2004, 14:37
|
|||
---|---|---|---|
Windows(Blib).Visible = False |
|||
#18+
Так работает If Not path1 & Blib = "" Then Application.DisplayAlerts = False ActiveWorkbook.UpdateRemoteReferences = False Workbooks.Open(path1 & Blib).RunAutoMacros xlAutoOpen Excel.Application.Windows(1).Visible = False Jojo® ... |
|||
:
Нравится:
Не нравится:
|
|||
|
|
start [/forum/topic.php?fid=61&mobile=1&tid=2186777]: |
0ms |
get settings: |
7ms |
get forum list: |
15ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
299ms |
get topic data: |
12ms |
get forum data: |
2ms |
get page messages: |
70ms |
get tp. blocked users: |
2ms |
others: | 13ms |
total: | 424ms |
0 / 0 |