UserForm - активна или нет

ran Пользователь Сообщений: 7207 Регистрация: 21.12.2012	#1 30.04.2011 22:57:17 Приветствую! Задача - если UserForm активна, берем номер строки с нее, если нет - с листа. Как определить номер - решаемая проблема. Как определить, где искать?

Guest Гость	#2 30.04.2011 23:04:03 у UserForm есть свойство Enabled - это не оно?

VovaK Пользователь Сообщений: 1716 Регистрация: 01.01.1970	#3 30.04.2011 23:08:21 По проверке ошибки: On Error Resume Next r = Userform.Caption If Err <> 0 Then r= Range("A1").Value

ran Пользователь Сообщений: 7207 Регистрация: 21.12.2012	#4 30.04.2011 23:20:26 Если написать r = UserForm.Caption то ошибка возникает всегда (не зависимо от того, открыта-ли форма) Если написать r = UserForm1.Caption то ошибка не возникает никогда(не зависимо от того, открыта-ли форма)

ikki Пользователь Сообщений: 9709 Регистрация: 22.12.2012	#5 30.04.2011 23:46:04 а так? Прикрепленные файлы post_224030.xls (33.5 КБ) фрилансер Excel, VBA - контакты в профиле "Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг

ikki

Пользователь

Сообщений: 9709 Регистрация: 22.12.2012

01.05.2011 00:03:34

нет, мой предыдущий вариант некорректен в случае вызова метода Hide
вот так - вроде бы всегда корректно работает
но надо пробовать :)

Прикрепленные файлы

post_224034.xls (36.5 КБ)

фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг

ran Пользователь Сообщений: 7207 Регистрация: 21.12.2012	#7 01.05.2011 00:09:52 Сенькюю!

Юрий М

Модератор

Сообщений: 61089 Регистрация: 14.09.2012

Контакты см. в профиле

01.05.2011 00:34:26

Имею возразить :-)
Если мы загрузим форму вот так:
UserForm1.Show 0
то, кликнув по любой ячейке, и нажав на кнопку Check на листе, получим сообщение "Из формы". Это я всё к чему: форма отображена, но НЕ АКТИВНА.
А в теме так и говорилось - Активна или нет.

ikki

Пользователь

Сообщений: 9709 Регистрация: 22.12.2012

01.05.2011 00:37:39

совершенно правильное возражение.
но про немодальные формы речь не шла :)

не проверяя на полигоне: скорее всего, нам таки ещё понадобится Enabled

Юрий М

Модератор

Сообщений: 61089 Регистрация: 14.09.2012

Контакты см. в профиле

#10

01.05.2011 00:44:22

{quote}{login=ikki}{date=01.05.2011 12:37}{thema=}{post}но про немодальные формы речь не шла :){/post}{/quote}
Согласен. Но ведь из вопроса можно и так истолковать активность/неактивность. Форма загружена, но не активна (активен лист) :-)
RAN, что скажете? :-) Про какую активность говорим?

ikki

Пользователь

Сообщений: 9709 Регистрация: 22.12.2012

#11

01.05.2011 00:48:13

{quote}{login=Юрий М}{date=01.05.2011 12:34}{thema=}{post}
А в теме так и говорилось - Активна или нет.{/post}{/quote}

так в том-то и состоит главная задача консультанта - объяснить заказчику, что ему на самом деле было надо, вне зависимости от того, что он там писал :)

Юрий М

Модератор

Сообщений: 61089 Регистрация: 14.09.2012

Контакты см. в профиле

#12

01.05.2011 00:56:03

Совершенно верно: тут уже неоднократно были случаи, когда "заказчик" что-то спрашивал, ему отвечали, советовали... И в конце-концов предлагали СОВЕРШЕННО другое. Причём, оказывалось, что ИМЕННО это и было нужно, и клиент уходил довольный :-)

ikki

Пользователь

Сообщений: 9709 Регистрация: 22.12.2012

#13

01.05.2011 00:59:53

я тут понемножку пробую разобраться с немодальками...
чё-то никак...
ни Enabled, ни установка/снятие глобальной переменной при событиях.
какое событие возникает, если, находясь на немодальке, щёлкнуть по ячейке?

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#14 01.05.2011 01:02:28 CelectionChange в любом случае произойти должно.

ikki

Пользователь

Сообщений: 9709 Регистрация: 22.12.2012

#15

01.05.2011 01:03:38

пока получилось сделать, только задействовав событие листа.
но это ж страшное дело :(

Прикрепленные файлы

post_224050.xls (38.5 КБ)

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#16 01.05.2011 01:10:51 Опять немного не то: активна какая-либо ячейка и кликаем сразу по кнопке на форме :-)

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#17 01.05.2011 01:12:46 Нужно добавлять MouseMove, наверное... А может ничего этого уже и не нужно?

ikki Пользователь Сообщений: 9709 Регистрация: 22.12.2012	#18 01.05.2011 01:13:37 это значит надо спать завтра будет день опять фрилансер Excel, VBA - контакты в профиле "Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг

ran

Пользователь

Сообщений: 7207 Регистрация: 21.12.2012

#19

01.05.2011 01:14:29

If UserForm1.Visible Then
меня вроде устроило.
Задача:
Есть лист1 с данными.
Есть форма для внесения данных на лист1.
Есть лист2 отчет.
Отчет можно формировать либо выбрав строку на листе с данными, либо найдя нужную запись в форме.
Для Hide пока применения не нашел...

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#20 01.05.2011 01:18:42 А глобальную переменную на активацию формы?

ran Пользователь Сообщений: 7207 Регистрация: 21.12.2012	#21 01.05.2011 01:21:59 А зачем?

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#22 01.05.2011 01:25:31 Вам же нужно было узнать - активна или нет. Не хотите переменную - не надо :-)

Читают тему