Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как закрыть форму другого воркбука? / 3 сообщений из 3, страница 1 из 1
23.01.2008, 10:10
    #35080622
фрм
фрм
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как закрыть форму другого воркбука?
в коде первого xls-файла временно открываю второй эксель-файл, читаю из него данные и закрываю его:
Код: plaintext
1.
2.
3.
Set File2 = Workbooks.Open(Filename:="C:\file2.xls", UpdateLinks:= 0 , ReadOnly:=True)
... 'читаю данные
File2.Close SaveChanges:=False
Все было нормально, но теперь во втором файле появилась форма которая автоматом запускается при открытии, т.е. в коде второго файла теперь есть:
Код: plaintext
1.
2.
Private Sub Workbook_Open()
Frm2.Show
End Sub
и в итоге получение данных стопорится, пока эту форму крестиком не закроешь.
Как мне обратиться к форме второго файла из кода первого, чтоб ее закрыть? Пробовал после строчки открытия добавить
Код: plaintext
Unload Frm2
и
Код: plaintext
Unload File2.Frm2
- не помогает(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.01.2008, 17:51
    #35082885
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как закрыть форму другого воркбука?
запрети события перед открытием книги
Код: plaintext
1.
2.
Application.EnableEvents = False
set file2=workbooks.open(....
Application.EnableEvents = true
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2008, 07:30
    #35083601
фрм
фрм
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как закрыть форму другого воркбука?
спасибо! помогло!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как закрыть форму другого воркбука? / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 385ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2162785]:
 0ms
get settings:
 9ms
get forum list:
 18ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 69ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 57ms
get tp. blocked users:
 1ms
others: 209ms
total:  385ms
x
x
Закрыть


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