Последние записи
- Нужен ли сайт разработчику?
- Обсуждаем технологию I2P
- Как запустить программу указанную в Edit.Text
- Скачать файл с использованием потока
- Поиск слова в Memo
- Распаковщик формата .img из GTA San Andreas
- Подсчет количества повторяющихся букв в файле
- Простейший скрипт загрузки картинки с помощью php
- Рассылка. Выпуск 154
- Получение картинки с веб-камеры
22nd
Авг
Как сделать чтобы скрывался и открывался столбец?
Posted by Chas under Basic, Пост-обзор
как сделать, чтобы одной кнопкой выполнялись две команды «скрыть/отобразить» по очереди. Ну т.е. нажал кнопку- выполнилась программа «Скрыть», нажал второй раз- выполнилась команда «Отобразить» и т.д.? как сделать чтобы скрывался и открывался столбец? И как можно защитить эту кнопку от использования ненужными пользователями, т.е. чтобы типа при нажатии на кнопку спрашивался пароль, например ?
Sub tttt()
Columns(7).Hidden = Not Columns(7).Hidden
End SubDim пароль_введен As Boolean
Sub bb()
If Not пароль_введен Then
пароль_введен = InputBox("Введите пароль") = "123" 'пароль
If Not пароль_введен Then MsgBox "Неверный пароль", vbCritical: Exit Sub
End If
'код кнопки
End Sub