как активизировать модальную UserForm - Microsoft Office Excel

Mike555 · 12.04.2011, 15:16

Уважаемые ФОРУМЧАНЕ!
Есть модальная UserForm (т.е. она видима на экране поверх листа .xls).
Подскажите, каким кодом её можно сделать активной и наоборот, сделать активным лист Excel.
Спасибо.

kuklp · 12.04.2011, 15:32

.show 0
.show -1

Mike555 · 24.04.2011, 23:23

Спасибо!
".show -1" у меня не работает, только "0" и "1" ----- Excel2003.

Проблемка такая: Рабочий лист над ним висит т.е всегда видима UserForm. И необходимо при одних условиях активировать рабочий лист, а при других - UserForm. Но сама UserForm должна оставаться видимой.
Бьюсь над этой задачей уже давненько. Help, MacroRecorder и поиск по форуму ответ не подсказали. Одна надежда на Вас - профи.
Спасибо, ещё раз.

wolf05632 · 24.04.2011, 23:27

.activate не пробовали?

doober · 24.04.2011, 23:47

Кака вариант сбросить в трей,потом востановить.

EducatedFool · 25.04.2011, 08:00

Тут можно и без WinAPI обойтись, если форма немодальная

Для активации книги Excel (при запущенной форме) выполняем команду

Код:

AppActivate "Microsoft Excel"

Для активации формы выполняем команду

Код:

UserForm1.Show

К примеру, чтобы форма открывалась, но активным оставалось приложение Excel, используйте такой код в модуле формы:

Код:

Private Sub UserForm_Activate()
    AppActivate "Microsoft Excel"
End Sub

Mike555 · 30.04.2011, 13:02

Вай, спасибо! и СПАСИБО огромное!

что-то получилось, теперь попробую это в модули добавить!

12.04.2011, 15:16	#1
Mike555 Регистрация: 09.06.2009 Сообщений: 7	как активизировать модальную UserForm Уважаемые ФОРУМЧАНЕ! Есть модальная UserForm (т.е. она видима на экране поверх листа .xls). Подскажите, каким кодом её можно сделать активной и наоборот, сделать активным лист Excel. Спасибо.

12.04.2011, 15:32	#2
kuklp Участник клуба Регистрация: 02.05.2010 Сообщений: 1,390	.show 0 .show -1 mailto: kuklp60@gmail.com, ящики для благодарностей: WM Z206653985942, R334086032478, U238399322728

25.04.2011, 08:00	#6
EducatedFool Программист VBA СуперМодератор Регистрация: 13.07.2008 Сообщений: 6,856	Тут можно и без WinAPI обойтись, если форма немодальная Для активации книги Excel (при запущенной форме) выполняем команду Код: `AppActivate "Microsoft Excel"` Для активации формы выполняем команду Код: `UserForm1.Show` К примеру, чтобы форма открывалась, но активным оставалось приложение Excel, используйте такой код в модуле формы: Код: `Private Sub UserForm_Activate() AppActivate "Microsoft Excel" End Sub` __Полезные надстройки для Excel. Парсинг сайтов и файлов. Макросы любой сложности на заказ. Мониторинг цен конкурентов

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Сохранение userform как объект xml	katherinebere	Microsoft Office Excel	7	07.05.2010 00:55
Одну и ту же форму использовать как MDI-child форму и как модальную форму?	PrimaryPro	Общие вопросы Delphi	2	10.03.2010 20:52
Как удалить модуль и userform	komar73	Microsoft Office Excel	2	26.03.2009 15:37
Как вставить фотку в UserForm	valerij	Microsoft Office Excel	11	06.02.2009 09:57
Как активизировать окно моего приложения?	_ozzy_	Общие вопросы Delphi	3	10.04.2008 13:25

24.04.2011, 23:23	#3
Mike555 Регистрация: 09.06.2009 Сообщений: 7	Спасибо! ".show -1" у меня не работает, только "0" и "1" ----- Excel2003. Проблемка такая: Рабочий лист над ним висит т.е всегда видима UserForm. И необходимо при одних условиях активировать рабочий лист, а при других - UserForm. Но сама UserForm должна оставаться видимой. Бьюсь над этой задачей уже давненько. Help, MacroRecorder и поиск по форуму ответ не подсказали. Одна надежда на Вас - профи. Спасибо, ещё раз.

24.04.2011, 23:27	#4
wolf05632 Пользователь Регистрация: 03.04.2011 Сообщений: 25	.activate не пробовали?

30.04.2011, 13:02	#7
Mike555 Регистрация: 09.06.2009 Сообщений: 7	Вай, спасибо! и СПАСИБО огромное! что-то получилось, теперь попробую это в модули добавить!