|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
15.08.2011, 13:56 | #1 |
Пользователь
Регистрация: 13.08.2011
Сообщений: 90
|
Одной кнопкой выполнялись две команды "скрыть/отобразить" по очереди
А кто знает: как сделать, чтобы одной кнопкой выполнялись две команды "скрыть/отобразить" по очереди. Ну т.е. нажал кнопку- выполнилась программа "Скрыть", нажал второй раз- выполнилась команда "Отобразить" и т.д.?
|
15.08.2011, 14:00 | #2 |
Участник клуба
Регистрация: 16.05.2010
Сообщений: 1,249
|
Без VBA: меню Данные-Группа_и_стркуктура-Группировать.
|
15.08.2011, 14:06 | #3 |
Пользователь
Регистрация: 13.08.2011
Сообщений: 90
|
Спасибо, vikttur, а в VBA как сделать чтобы скрывался и открывался столбец?
|
15.08.2011, 14:06 | #4 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 15.08.2011 в 14:12. |
15.08.2011, 14:19 | #5 |
Пользователь
Регистрация: 13.08.2011
Сообщений: 90
|
Что то не получается, может я не правильно делаю?
Sub tt() Dim a As Boolean If a Then MsgBox "Отобразить": a = 0 Columns("B:B").Hidden = False Else MsgBox "Скрыть": a = 1 Columns("B:B").Hidden = True End If End Sub |
15.08.2011, 14:21 | #6 |
Пользователь
Регистрация: 13.08.2011
Сообщений: 90
|
Прошу прощения! Всё получилось!
Hugo121, большое спасибо! |
15.08.2011, 15:33 | #7 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Определение a не зря вынесено вне кода процедуры
Если работаем с скрытием столбцов - то наличие/отсутствие скрытия заменяет эту переменную, так что вполне хватит одного кода Sub ttt() Или даже так - можно "непонятно упростить": Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 15.08.2011 в 15:38. |
15.08.2011, 15:45 | #8 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
упрощать так упрощать:
Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
15.08.2011, 15:59 | #9 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Что скажешь - мастер недопёр....
webmoney: E265281470651 Z422237915069 R418926282008
|
15.08.2011, 16:44 | #10 |
Пользователь
Регистрация: 13.08.2011
Сообщений: 90
|
Круто !!!
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Диалог выбора директории с кнопкой "Создать папку" | artemavd | Общие вопросы Delphi | 8 | 24.11.2010 11:26 |
Как найти hwnd окна, которое вызывается кнопкой "Пуск"? | marina15056 | Помощь студентам | 0 | 11.10.2010 17:20 |
при вводе на листе "магазин"- код товара появлялось "описание" товара из "склада" с "продажной ценой" | aleksei78 | Microsoft Office Excel | 13 | 25.08.2009 12:04 |
две задачи(программа"верификация" , "как бригадиру разделить зароботаные деньги) | Valik102 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 13.05.2009 23:32 |
две задачи(программа"верификация" , "как бригадиру разделить зароботаные деньги) | Valik102 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 13.05.2009 18:13 |