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

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

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

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


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