Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Автоматический ввод пароля
 
#1
06.02.2012 16:38:52
Помогите решить такую проблему.  
Имеется много компьютеров в сети, на сервере висит таблица_1 с данными на которую сслылается МОЙ компьютер и использует эти данные для расчетов.Мои сотрудники вносят изменения в таблицу_1 и постоянно забывают ее защитить паролем от того, чтобы другие не смогли в ней менять данные. Можно ли сделать так, чтобы при закрывании таблицы_1 происходил автоматический ввод пароля?.
 
 
 
#2
06.02.2012 18:03:34
Посмотрите раздел приемы, там есть то, что вам нужно.
 
 
 
#3
07.02.2012 11:15:21
Я прочитал статью "Правильная защита макросом", но там немножко не то, а я с макросами никогда не работал и опыта нет выполнить конкретную задачу. Помогите, если можете. Спасибо!!!
 
 
 
#4
07.02.2012 19:33:21
Поместите в модуле ЭтаКнига этот макрос:  
   Sub Workbook_BeforeClose(Cancel As Boolean)  
   ActiveWorkbook.Sheets("Sheet1").Select  
   ActiveSheet.Protect Password = "123"  
   ActiveSheet.EnableSelection = xlNoSelection  
   ActiveWorkbook.Save  
   End Sub  
Пароль и название листа, естественно, - свои.) Перед закрытием книги будет автоматически паролиться необходимый лист и сохраняться внесённые изменения.
 
 
 
#5
08.02.2012 11:04:24
EL.EMENT, спасибо огромное что откликнулись!!!  
Сделал как вы написали, но при вводе пороля при редактировании листа пишет, что пороль неверный. Пороли в макросе менял сто раз, но всегда он неверный. Что делать?
 
 
 
#6
08.02.2012 12:05:45
Попробуйте простой пароль ТОЛЬКО из цифр. Если и так не получится - покажите небольшой пример, где это не получается.
 
 
 
#7
08.02.2012 13:20:48
Я вводил и одни цифры, вот мой текст макроса:  
Sub Workbook_BeforeClose(Cancel As Boolean)  
ActiveWorkbook.Sheets("Выработка ПЦ-3").Select  
ActiveSheet.Protect Password = "123"  
ActiveSheet.EnableSelection = xlNoSelection  
ActiveWorkbook.Save  
End Sub  
Прикрепил рисунок.  
Помогите разобраться!!!
 
 
 
#8
08.02.2012 14:18:07
The_Prist, сделал как Вы сказали. При первом открывании документа все сработало! После ввода пароля и данных в таблицу сохранил документ. Открываю документ повторно, а документ открыт для редактирования, т.е. не защищен паролем.  
Доработайте, пожалуйста!!!!!
 
 
 
#9
08.02.2012 16:36:32
Да, на том. Почему же у меня не работает???  
Может где какие-нибудь "галочки" нужно поставить?
 
 
 
#10
08.02.2012 16:56:03
The_Prist, Вы введите пароль и измените данные в таблице, вот после этого пароль не вводится автоматически.
 
 
 
#11
08.02.2012 20:17:00
{quote}{login=FILVIT}{date=08.02.2012 04:56}{thema=}{post}введите пароль и измените данные в таблице, вот после этого пароль не вводится автоматически.{/post}{/quote}Проделал это трижды - каждый раз после открытия книги ячейки недоступны. Т.е. защита ставится.
 
 
 
#12
08.02.2012 21:24:41
{quote}{login=The_Prist}{date=08.02.2012 09:13}{thema=Re: }{post}{quote}{login=FILVIT}{date=08.02.2012 04:56}{thema=}{post}The_Prist, Вы введите пароль и измените данные в таблице, вот после этого пароль не вводится автоматически.{/post}{/quote}Ввел. Да, действительно. Сразу после ввода данных защита не ставится.{/post}{/quote}Дим, а разве было такое условие, чтобы после редактирования СРАЗУ защита ставилась? :-) Было условие на закрытие книги, если я ничего не путаю.
 
 
 
#13
08.02.2012 21:31:32
Дома ввел макрос в таблицу и все работает!!! Но дома Excel 2010, а на работе делал в Excel 2007. Может из-за этого?
 
 
 
#14
08.02.2012 21:35:56
Проверил на 2007 (до этого проверял на 2003) - всё работает. Да и причём здесь версия? Вы в какой модуль помещали код?
 
 
 
#15
08.02.2012 21:43:06
Вот моя таблица с макросом, которая на Excel 2010 работает. На работе делал точно также на Excel 2010 и не работало.
 
 
 
#16
08.02.2012 22:00:03
FILVIT, а зачем Вы показываете файл, где всё работает? Другое дело - показать НЕРАБОЧИЙ. Рабочий зачем?
 
 
 
#17
08.02.2012 22:17:12
завтра сброшу Нерабочий.
 
 
 
#18
09.02.2012 09:43:58
Утром запустил таблицу с макросом на рабочем компе на Excel 2007 и пароль не вводится.  
Прикрепляю свою таблицу. Посмотрите, пожалуйста!  
 
 
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>
 
 
 
#19
09.02.2012 09:52:45
Проверил на 2007. Все работает. Мож у Вас там макросы не включены? И размер файла велик. Правила почитайте. П. 3.
Я сам - дурнее всякого примера! ...
 
 
 
#20
09.02.2012 13:39:15
Ура!!! Все заработало!!!  
Поставил галочку в строке "Доверять доступ к объектной модели проектов VBA".  
Всем огромное СПАСИБО за помощь!!!
 
 
 
Страницы: 1
Читают тему
Наверх