ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / При закрытии модальной закрываются все формы
7 сообщений из 7, страница 1 из 1
При закрытии модальной закрываются все формы
    #36677029
Тыжных Иван
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тыжных Иван
Участник
Имеется немодальная UserForm. Из нее по кнопочке вызывается модальная форма UserForm2 таким кодом:



Код: plaintext
1.
2.
3.
4.
5.
6.
    Dim f As UserForm2
   
    Set f = New UserForm2
    f.Tag = <ключ>
    f.INIFORM 'инициализация формы в зависимости от ключа
    f.Show     'тадааам

При закрытии формы f закрывается и UserForm, хотя она вообщем то не при чем.
Если UserForm2 сделать немодальной (чего не хотелось бы), то закрывается только она.
Как закрыть модальную форму, не закрывая немодальную?
...
Рейтинг: 0 / 0
09.06.2010, 09:33
| Ответить | Цитировать | Написать  
При закрытии модальной закрываются все формы
    #36677121
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
Тыжных ИванИмеется немодальная UserForm. Из нее по кнопочке вызывается модальная форма UserForm2 таким кодом:



Код: plaintext
1.
2.
3.
4.
5.
6.
    Dim f As UserForm2
   
    Set f = New UserForm2
    f.Tag = <ключ>
    f.INIFORM 'инициализация формы в зависимости от ключа
    f.Show     'тадааам

При закрытии формы f закрывается и UserForm, хотя она вообщем то не при чем.
Если UserForm2 сделать немодальной (чего не хотелось бы), то закрывается только она.
Как закрыть модальную форму, не закрывая немодальную?


Если я верно Вас понял, то попробуйте так


Код: plaintext
1.
2.
3.
4.
5.
6.
    Dim f As UserForm2
   
    Set f = New UserForm2
    f.Tag = <ключ>
    f.INIFORM 'инициализация формы в зависимости от ключа
    f.Show  0    'тадааам
...
Рейтинг: 0 / 0
09.06.2010, 10:00
| Ответить | Цитировать | Написать  
При закрытии модальной закрываются все формы
    #36677125
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
Тыжных Иван,

а вообще я попробовал из немодальной формы вызывать модальную и VBA меня послал
а если обе модальные то закрываются они независимо друг от друга
...
Рейтинг: 0 / 0
09.06.2010, 10:02
| Ответить | Цитировать | Написать  
При закрытии модальной закрываются все формы
    #36677133
Фотография Shamanus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shamanus
Участник
перепутал VBA послал при обратной ситуации.
...
Рейтинг: 0 / 0
09.06.2010, 10:05
| Ответить | Цитировать | Написать  
При закрытии модальной закрываются все формы
    #36677160
Тыжных Иван
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тыжных Иван
Участник
Shamanus
Если я верно Вас понял, то попробуйте так


Тогда она становится немодальной и всё класс )
Видимо это аналог для
Код: plaintext
ShowModal=false
...
Рейтинг: 0 / 0
09.06.2010, 10:14
| Ответить | Цитировать | Написать  
При закрытии модальной закрываются все формы
    #36677190
Тыжных Иван
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тыжных Иван
Участник
Если немодальную UserForm вызывать кодом:

Код: plaintext
UserForm.Show

тогда она закрывается вместе с модальной



Если немодальную UserForm вызывать кодом:

Код: plaintext
1.
2.
    Dim f As New UserForm
    f.Show  0

то при закрытии вызванной из нее модальной формы, она сама не закрывается.
То что надо. Осталось как-нить запретить вызов UserForm если она уже открыта.
...
Рейтинг: 0 / 0
09.06.2010, 10:22
| Ответить | Цитировать | Написать  
При закрытии модальной закрываются все формы
    #36677241
Тыжных Иван
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тыжных Иван
Участник
Интересно, что даже при таком вызове:

Код: plaintext
1.
2.
    Dim f As New UserForm
    f.Show  0

форма открывается один раз и дополнительных проверок делать не надо.

Мне конечно хорошо, но в будущем, если захочется вызвать две одинаковые формы с разными данными, возникнут траблы.

Тот же прием в Access'е открывает две формы. Правда аксес может возвращать коллекцию открытых форм.
...
Рейтинг: 0 / 0
09.06.2010, 10:32
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / При закрытии модальной закрываются все формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36677029&tid=2178015]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 141ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 202ms
total:  413ms
созд. / загр.: 413ms
x
x
Закрыть


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