Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Отрыть/скрыть строки при помощи CheckBox - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отрыть/скрыть строки при помощи CheckBox (Макросы/Sub)
Отрыть/скрыть строки при помощи CheckBox
Aleks1308 Дата: Четверг, 12.11.2015, 15:51 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Уважаемые знатоки Exel, прошу вашей помощи! Суть задачи: если в checkbox стоит галочка, то автоматически скрыты определенные строки, при отжатии галочки - строки появляются. Команды по скрытию и открытию строк написал, но не могу связать их с chekbox. Если после If написать True, то макрос работает только на удаление ;). Файл прилагаю. Я в программировании макросов не силен, только начал изучать, пробовал разные комбинации писать, но ничего не вышло.
К сообщению приложен файл: 5329176.xlsm (17.8 Kb)


Сообщение отредактировал Aleks1308 - Четверг, 12.11.2015, 15:55
 
Ответить
СообщениеУважаемые знатоки Exel, прошу вашей помощи! Суть задачи: если в checkbox стоит галочка, то автоматически скрыты определенные строки, при отжатии галочки - строки появляются. Команды по скрытию и открытию строк написал, но не могу связать их с chekbox. Если после If написать True, то макрос работает только на удаление ;). Файл прилагаю. Я в программировании макросов не силен, только начал изучать, пробовал разные комбинации писать, но ничего не вышло.

Автор - Aleks1308
Дата добавления - 12.11.2015 в 15:51
_Boroda_ Дата: Четверг, 12.11.2015, 16:04 | Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Используйте ЧекБокс не из элементов формы, а из АктивХ
И код
[vba]
Код
Private Sub CheckBox1_Click()
    Rows("4:6").EntireRow.Hidden = CheckBox1.Value
End Sub
[/vba]
К сообщению приложен файл: 5329176_1.xlsm (21.8 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеИспользуйте ЧекБокс не из элементов формы, а из АктивХ
И код
[vba]
Код
Private Sub CheckBox1_Click()
    Rows("4:6").EntireRow.Hidden = CheckBox1.Value
End Sub
[/vba]

Автор - _Boroda_
Дата добавления - 12.11.2015 в 16:04
Aleks1308 Дата: Пятница, 13.11.2015, 13:47 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, большое спасибо за твой ответ! Файл работает. Но можно ли организовать скрытие/отображение строк через Чекбокс из элементов формы? Дело в том, что изначально моя цель была создать Чекбокс, чтобы при нажатии скрывались определенные листы и строки. Как скрыть листы я нашел на сайте, но никак не смог написать корректную программу по скрытию/отображению строк. Заранее благодарю за любой ответ!


Сообщение отредактировал Aleks1308 - Пятница, 13.11.2015, 14:01
 
Ответить
Сообщение_Boroda_, большое спасибо за твой ответ! Файл работает. Но можно ли организовать скрытие/отображение строк через Чекбокс из элементов формы? Дело в том, что изначально моя цель была создать Чекбокс, чтобы при нажатии скрывались определенные листы и строки. Как скрыть листы я нашел на сайте, но никак не смог написать корректную программу по скрытию/отображению строк. Заранее благодарю за любой ответ!

Автор - Aleks1308
Дата добавления - 13.11.2015 в 13:47
_Boroda_ Дата: Пятница, 13.11.2015, 14:04 | Сообщение № 4
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
можно ли организовать скрытие/отображение строк через Чекбокс из элементов формы? Дело в том, что изначально моя цель была создать Чекбокс, чтобы при нажатии скрывались определенные листы и строки

Не вижу никакой связи между тем, что хотите именно элемент формы и скрытием листов\строк. Поясните.


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
Сообщение
можно ли организовать скрытие/отображение строк через Чекбокс из элементов формы? Дело в том, что изначально моя цель была создать Чекбокс, чтобы при нажатии скрывались определенные листы и строки

Не вижу никакой связи между тем, что хотите именно элемент формы и скрытием листов\строк. Поясните.

Автор - _Boroda_
Дата добавления - 13.11.2015 в 14:04
Aleks1308 Дата: Пятница, 13.11.2015, 14:31 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Заранее прошу прощения, если немного отступил от темы. Моя цель получить программу с скрытием/отображением строк и листов. На вашем сайте, я нашел описание программы с использованием Чекбокс с скрытием/отображением листов, но она работает только с ЧекБоксом из формы. Поэтому, я попросил пояснить, можно ли привязать скрытие/отображение строк используя ЧекБокс из формы. Файл приложил.
К сообщению приложен файл: 2t.xlsm (23.2 Kb)


Сообщение отредактировал Aleks1308 - Пятница, 13.11.2015, 14:32
 
Ответить
СообщениеЗаранее прошу прощения, если немного отступил от темы. Моя цель получить программу с скрытием/отображением строк и листов. На вашем сайте, я нашел описание программы с использованием Чекбокс с скрытием/отображением листов, но она работает только с ЧекБоксом из формы. Поэтому, я попросил пояснить, можно ли привязать скрытие/отображение строк используя ЧекБокс из формы. Файл приложил.

Автор - Aleks1308
Дата добавления - 13.11.2015 в 14:31
_Boroda_ Дата: Пятница, 13.11.2015, 14:41 | Сообщение № 6
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
она работает только с ЧекБоксом из формы

Ой, там столько буков всяких :D . Вот так не проще будет?
[vba]
Код
Private Sub CheckBox1_Click()
    Rows("4:6").EntireRow.Hidden = CheckBox1.Value
    Sheets("Sheet2").Visible = Not CheckBox1.Value
End Sub
[/vba]

Переписал. Добавил Not
К сообщению приложен файл: 2t_1.xlsm (20.5 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
Сообщение
она работает только с ЧекБоксом из формы

Ой, там столько буков всяких :D . Вот так не проще будет?
[vba]
Код
Private Sub CheckBox1_Click()
    Rows("4:6").EntireRow.Hidden = CheckBox1.Value
    Sheets("Sheet2").Visible = Not CheckBox1.Value
End Sub
[/vba]

Переписал. Добавил Not

Автор - _Boroda_
Дата добавления - 13.11.2015 в 14:41
Aleks1308 Дата: Пятница, 13.11.2015, 14:47 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Большое большое Вам спасибо! Честное слово, я такой код прописывал, но у меня ничего не получилось, а Ваш код скопировал и все заработало, видимо где-то букву пропускал. Очень Вам благодарен!!!
 
Ответить
СообщениеБольшое большое Вам спасибо! Честное слово, я такой код прописывал, но у меня ничего не получилось, а Ваш код скопировал и все заработало, видимо где-то букву пропускал. Очень Вам благодарен!!!

Автор - Aleks1308
Дата добавления - 13.11.2015 в 14:47
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отрыть/скрыть строки при помощи CheckBox (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!