Как сделать чтобы скрывался и открывался столбец?

Posted by Chas under Basic, Пост-обзор

как сделать, чтобы одной кнопкой выполнялись две команды «скрыть/отобразить» по очереди. Ну т.е. нажал кнопку- выполнилась программа «Скрыть», нажал второй раз- выполнилась команда «Отобразить» и т.д.? как сделать чтобы скрывался и открывался столбец? И как можно защитить эту кнопку от использования ненужными пользователями, т.е. чтобы типа при нажатии на кнопку спрашивался пароль, например ?

Sub tttt()

  Columns(7).Hidden = Not Columns(7).Hidden

End Sub

Dim пароль_введен As Boolean

Sub bb()

If Not пароль_введен Then

    пароль_введен = InputBox("Введите пароль") = "123" 'пароль

    If Not пароль_введен Then MsgBox "Неверный пароль", vbCritical: Exit Sub

End If

'код кнопки

End Sub

тема на форуме

Похожие статьи

• Примечание в ячейки листа со значением из другой ячейки
• Как макросом брать данные с word документов в excel?
• Как сделать, чтобы выводило сообщение «данные пользователем не заполнены», если все ячейки столбца G пустые
• Вывести сообщение, если ячейки excel не заполнены
• Как зафиксировать кнопку на экране?
• Найти совпадения ячеек столбца С и столбца Е и вывести все совпавшие ячейки в столбец G по клику кнопки
• Как сделать выпадающий список с добавлением новых элементов?
• Удалить строки таблицы по встречающимся словам
• Как написать макрос который бы по клику по ячейке скрывал столбец?
• Объединение ячеек со сдвигом вверх?