Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как спрятать кнопку? / 15 сообщений из 15, страница 1 из 1
26.10.2011, 10:12
    #37498213
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Добрый день!
Excel 2007. Нужно сделать следующую вещь:
Есть кнопка ToggleButton1. Необходимо, чтобы она была скрыта, а при вводе в ячейку C50 числа (точнее почтового индекса) она появлялась. При вводе в ячейку С50 текстовой информации ее тоже видно быть не должно.
Заранее спасибо!
...
Рейтинг: 0 / 0
26.10.2011, 10:58
    #37498356
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
ВладимирВ,

В модуль листа:
Код: plaintext
1.
2.
Private Sub Worksheet_Change(ByVal Target As Range)
    ToggleButton1.Visible = IsNumeric([c50])
End Sub
...
Рейтинг: 0 / 0
26.10.2011, 11:30
    #37498418
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Чета не получается...
Вот ссылка на файл, на форуме ограничение по размеру - 150 kb, а у меня 500, потому положил сюда: http://www.colormusic.ru/000/proba.xlsm
Нужно, чтобы кнопка "EMS" внизу листа всегда была спрятана, а появлялась лишь при вводе в ячейку B120 числа, точнее почтового индекса.

В лист "Заказ" прописал код:
Код: plaintext
1.
2.
Private Sub Worksheet_Change(ByVal Target As Range)
    EMS.Visible = IsNumeric([b120])
End Sub
...
Рейтинг: 0 / 0
26.10.2011, 11:57
    #37498501
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
ВладимирВ,
знакомый файл :)
Вы напишите, какого вида индекс ожидаете, а то например я не знаю.
Да и Сергей не из России :)
...
Рейтинг: 0 / 0
26.10.2011, 12:15
    #37498554
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Добрый день!
Да самый обычный индекс - 6 цифр. Хотя мне попадались индексы и 5-ти значные. В строке b120 может быть либо адрес доставки по Москве (текст), либо индекс, адрес в этом случае пишется ниже. Так вот, необходимо, чтобы если в эту строку вводится текст или ничего - кнопка "ЕМС" должна быть спрятана, а если число - то появилась. Нужная функция у меня на кнопку уже установлена.
...
Рейтинг: 0 / 0
26.10.2011, 12:21
    #37498577
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
ВладимирВ,

У меня работает. В Вашем файле.
...
Рейтинг: 0 / 0
26.10.2011, 12:30
    #37498604
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
А я проверить не могу - через конвертер на 2003 кнопки глючат, не работаеют...
...
Рейтинг: 0 / 0
26.10.2011, 12:32
    #37498616
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Как работает?!!
Открываем файл - кнопка "EMS" видна и работает, а быть ее не должно.
А вот если ввести в b120 индекс, например, 117342, она должна появиться.
У меня она торчит постоянно...
...
Рейтинг: 0 / 0
26.10.2011, 12:48
    #37498662
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
ВладимирВ,

Ввожу текст - кнопка прячется, число - показывается.
...
Рейтинг: 0 / 0
26.10.2011, 12:56
    #37498688
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Мож Вы режим конструктора забыли отключить?
...
Рейтинг: 0 / 0
26.10.2011, 13:34
    #37498785
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Вот в чем дело - в самом начале, когда клетка b120 пустая кнопки быть не должно, она должна появиться, только если в эту клетку ввести число
...
Рейтинг: 0 / 0
26.10.2011, 13:41
    #37498809
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
ВладимирВ, так поставьте изначально в свойствах кнопки скрытость.
...
Рейтинг: 0 / 0
26.10.2011, 13:58
    #37498845
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Это не решение, я так пробовал. Кнопка изначально прячется, и вроде бы показывается/прячется при вводе числа/текста. Но если теперь текст удалить, то она должна спрятаться, как и в начале запуска файла, а она остается. Поэтому как-то надо в процедуру это ввести, а я в этом не силен...
...
Рейтинг: 0 / 0
26.10.2011, 13:58
    #37498847
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
Мож Вам это надо:
Код: plaintext
1.
2.
3.
Private Sub Worksheet_Change(ByVal Target As Range)
    EMS.Visible = IsNumeric([b120]) And [b120] <> ""
End Sub
...
Рейтинг: 0 / 0
26.10.2011, 14:52
    #37498952
ВладимирВ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как спрятать кнопку?
СПАСИБО!
Вроде все заработало как надо, буду дальше доделывать...
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как спрятать кнопку? / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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