Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Установка пароля на открытие книги через VBA
 
#1
20.11.2018 16:16:01
Всем привет!
Помогите пожалуйста с кодом.
Суть такова. Имеется файл Excel.
В него нужно добавить код по принципу "самоуничтожения", но  идея в том, чтобы файл, по наступлению определенной даты НЕ самоуничтожался, а чтобы при закрытии файла после определенной даты - устанавливался определенный пароль на открытие файла.

Помогите плз
 
 
 
#2
20.11.2018 16:26:49
защита  в Excel для того чтобы неопытный пользовательне не смог "заломать" своими действиями работающую систему
защиты от злоумышленника - нет
т.е. формально она есть, а реально - она не защита
Изменено: Ігор Гончаренко - 20.11.2018 16:29:26
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
 
 
#3
20.11.2018 16:38:26
Ігор Гончаренко, согласен. Но реализация данной задачи очень важна для меня.
 
 
 
#4
20.11.2018 16:42:21
Что-то мне подсказывает, что "определённая дата" - это дата увольнения  ;)
 
 
 
#5
20.11.2018 16:47:16
В модуль книги на событие открытия пишете проверку: если текущая дата >= "Определённой", то запрашиваете пароль.  
 
 
 
#6
20.11.2018 16:47:29
alexleoix, кстати "подсказка" тоже имеет свое место быть, тут можно было бы все самоуничтожить. Идея в другом, чтобы не оставаться в дурнях при разработке :)
 
 
 
#7
20.11.2018 16:55:58
Юрий М, я в последнее время, как-то отдалился от макросов (в сторону PQ). Посему вопрос: напомните, пожалуйста, а если не включать при открытии макросы, то как сработает эта проверка? Я, помнится, когда подобный файлик писал - на открытие ещё сокрытие всех листов делал и напоминалку на включение макросов вешал. И то после аварийного завершения файл открывал последний активный лист в том виде, в котором это завершение произошло.
 
 
 
#8
20.11.2018 16:57:55
Юрий М, а можно немного подробнее, честно говоря даже представления не имею как это сделать. "на событие открытия пишете проверку: если текущая дата >= "Определённой", то запрашиваете пароль"
Спасибо!
 
 
 
#9
20.11.2018 17:00:42
Цитата
alexleoix написал:
если не включать при открытии макросы, то как сработает эта проверка?
Не сработает, конечно! )) Но на сайте Дмитрия Щербакова есть статья, как вынудить пользователя включить макросы.
 
 
 
#10
20.11.2018 17:04:09
Цитата
Prsk.N написал:
а можно немного подробнее
Подробнее? Ну ладно: открываем редактор, выбираем соответствующий модуль, находим в нём нужную процедуру и добавляем проверку на дату. По результатам проверки открываем (или нет) диалоговое окно, в которое необходимо ввести пароль. Проверяем правильность пароля: если верно - открываем книгу.
Не сочтите за издевательство, но именно это Вы просили - подробнее.
 
 
 
#11
20.11.2018 17:05:11
Да, Юрий М, помню эту статью. По ней в своё время тот свой файлик и создавал. Ещё была статья "Каждому пользователю свой диапазон". Полагаю, нашему ТС она тоже очень пригодится.
 
 
 
#12
20.11.2018 17:44:19
alexleoix, можно пойти другим путем, поставить пароль, и макросом снимать
если макрос отключен, сработает защита.
если пришел час Ч, макрос пароль не снимает.
Ну как то так.
 
 
 
#13
20.11.2018 21:00:28
Юрий М, ))
Тогда вопросы, что значит ищем нужную процедуру? Добавляем проверку по дате - как её добавить? Как по результатом проверки добавить диалоговое окно? Как вообще добавить проверку?
Прошу прощенья, но в части "редактора VBA" я на Вы
Изменено: Николай - 21.11.2018 08:15:05
 
 
 
#14
20.11.2018 21:42:59
Prsk.N, зайдите в свой профиль и поменяйте отображаемое имя (логин) и не спорьте с модератором.
После этого продолжим по теме.
 
 
 
#15
21.11.2018 17:55:33
См. вариант. Код с комментариями. Всё должно быть понятно. Посмотреть его можно в модуле книги. Какие бывают модули, и где их искать - можно почитать здесь
Пароль 123.
 
 
 
#16
23.11.2018 08:26:27
Юрий М, спасибо! Пробел в звене закрыт. Теперь смогу придумать интересную штуку. Чуть позже выложу свой вариант :)
 
 
 
#17
23.11.2018 08:40:10
Николай, Бэкапы, теневые копии, а также временная смена системного времени разрушит всю вашу идею, даже без копания в самом excel файле.
Цитата
Ігор Гончаренко написал:
т.е. формально она есть, а реально - она не защита
Изменено: БМВ - 23.11.2018 08:40:26
По вопросам из тем форума, личку не читаю.
 
 
 
#18
23.11.2018 08:43:09
Миш, предупреждали, но
Цитата
Prsk.N написал:
Ігор Гончаренко , согласен. Но реализация данной задачи очень важна для меня
 
 
 
#19
23.11.2018 09:04:55
Цитата
Prsk.N написал:
Идея в другом, чтобы не оставаться в дурнях при разработке
Отговаривать не буду, просто потратив силы и оказаться все равно в дураках - еще обиднее
Цитата
Николай написал:
Теперь смогу придумать интересную штуку.
то есть еще и болты не подвезли, а уже нужны ключи, и неважно, что привезут винты и шпильки :-)
По вопросам из тем форума, личку не читаю.
 
 
 
#20
23.11.2018 17:37:21
Юрий М, Вы своим первым комментарием очень хорошо меня подтолкнули. И все равно в дураках никто не останется. (когда-нибудь напишу сюда о результате). Кстати болты вместе со шпильками лежат уже на полке в доме.
БМВ, Теперь предположим, что существует всего один документ, который, по истечении времени должен не открыться. Бэкапов нет. Откат времени? Ну и пусть, а документ уже под паролем. Отключить макрос? Изменить расширение с .xlsm на что-то другое - документ под паролем. Все, доступ к инфе закрыт. Работать с копиями? Ну, хорошо, а данных нет :)
Ещё раз спасибо всем кто подсказал в каком векторе можно думать. Файл получился рабочим.
Изменено: Николай - 23.11.2018 17:37:40
 
 
 
#21
23.11.2018 18:06:07
Цитата
Николай написал:
Бэкапов нет.
Где файл лежит? Если на сервере, то с Windows Server 2003 Есть Shutdow Copy , с windows Vista до 2008 это было доступно и на рабочей станции, конечно если включено было и там и там. Более менее нормальные хранилища имеют SnapShot services. Все способы позволяют самому пользователю восстановить файл  из доступных предыдущих версий, даже не привлекая админа. Так что может оказаться что бэкапа нет, а файл есть.
Знать бы причину основную , может быть или отговорили или наоборот посоветовали б чего, а так могу только пожелать е остаться в дураках. Успехов.
По вопросам из тем форума, личку не читаю.
 
 
 
#22
23.11.2018 22:41:27
Цитата
Николай написал:
Бэкапов нет.
 
 
 
#23
24.11.2018 00:29:07
БМВ,Нет нет, обычный компьютер, без серевера и т.п., обычная винда 10ка. Ну даже если и восстановится файл, пусть, хотя даже не могу понять, как "сам себя" файл восстановит :)
Спасибо!

alexleoix, конечно есть!

Вот кстати сейчас пришла ещё одна идея. вопрос удален [МОДЕРАТОР]
Есть у кого какие мысли?
 
 
 
#24
24.11.2018 00:48:21
Цитата
Николай написал:
Есть у кого какие мысли?
:)  Есть здесь: одна тема = один вопрос
 
 
 
#25
24.11.2018 03:29:51
_Igor_61,очень информативно, спасибо!
 
 
 
#26
24.11.2018 12:03:48
Цитата
Николай написал:
Ну даже если и восстановится файл, пусть, хотя даже не могу понять, как "сам себя" файл восстановит
У меня на компе сервис выключен и это выглядит так как слева, а вот справа так - как может быть , если теневое копирование включено.
Изменено: БМВ - 24.11.2018 12:52:26
По вопросам из тем форума, личку не читаю.
 
 
 
#27
24.11.2018 12:36:07
Так не проще ли скомпилировать весь код в DLL? Или создать EXE файл?
Тогда уже сложнее будет и защиту открыть, и код посмотреть.
Лично я пользуюсь решениями от DoneEx. Они хоть и платные, зато не беспокоюсь, что кто-то прочитает мой код, потом еще, если разберется в нем, будет использовать в своих корыстных целях :)
 
 
 
#28
24.11.2018 12:51:48
Diana Tailor, Вы слишком молоды и не можете помнить,  что в девяностые, самый стойкий пароль вскрывался электромонтажным или электротехнологическим инструментом (Паяльник, Утюг) :-)
По вопросам из тем форума, личку не читаю.
 
 
 
Страницы: 1
Наверх