Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Возобновление защиты листов при закрытии excel - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Возобновление защиты листов при закрытии excel (Формулы/Formulas)
Возобновление защиты листов при закрытии excel
Killerlord Дата: Среда, 17.02.2016, 10:57 | Сообщение № 21
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 80% ±

Excel 2007
Вопрос еще в силе, я прописал код в книгу
[vba]
Код
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For i = 1 To Sheets.Count
    Sheets(i).Protect
    Next i
End Sub
[/vba]
После этого кода у меня заработала защита, но защита без пароля. Просто нажимаю снять защиту и пароль не запрашивается.
Если еще идеи как можно это сделать ?
 
Ответить
СообщениеВопрос еще в силе, я прописал код в книгу
[vba]
Код
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For i = 1 To Sheets.Count
    Sheets(i).Protect
    Next i
End Sub
[/vba]
После этого кода у меня заработала защита, но защита без пароля. Просто нажимаю снять защиту и пароль не запрашивается.
Если еще идеи как можно это сделать ?
Автор - Killerlord
Дата добавления - 17.02.2016 в 10:57
Апострофф Дата: Среда, 17.02.2016, 11:08 | Сообщение № 22
Группа: Проверенные
Ранг: Обитатель
Сообщений: 445
Репутация: 123 ±
Замечаний: 0% ±

Excel 1997
[vba]
Код
Sheets(i).Protect "Пароль"
[/vba]и на всех листах будет указанный Пароль
 
Ответить
Сообщение[vba]
Код
Sheets(i).Protect "Пароль"
[/vba]и на всех листах будет указанный Пароль
Автор - Апострофф
Дата добавления - 17.02.2016 в 11:08
Wasilich Дата: Среда, 17.02.2016, 20:12 | Сообщение № 23
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Цитата Killerlord, 17.02.2016 в 10:57, в сообщении № 21
нажимаю снять защиту и пароль не запрашивается.
Так запишите:
[vba]
Код
Sheets(i).Protect Password:="123"
[/vba]


Сообщение отредактировал Wasilic - Среда, 17.02.2016, 20:14
 
Ответить
Сообщение
Цитата Killerlord, 17.02.2016 в 10:57, в сообщении № 21
нажимаю снять защиту и пароль не запрашивается.
Так запишите:
[vba]
Код
Sheets(i).Protect Password:="123"
[/vba]
Автор - Wasilich
Дата добавления - 17.02.2016 в 20:12
Udik Дата: Среда, 17.02.2016, 21:40 | Сообщение № 24
Группа: Друзья
Ранг: Старожил
Сообщений: 1588
Репутация: 192 ±
Замечаний: 0% ±

Excel 2016 х 64
Цитата Killerlord, 16.02.2016 в 20:22, в сообщении № 20
Прописал в листе, нечего не меняется.

А макрос-то запускали после записи? Я на своем проверял -всё работает.
К сообщению приложен файл: 5554116.xlsb (14.8 Kb)

вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com
 
Ответить
Сообщение
Цитата Killerlord, 16.02.2016 в 20:22, в сообщении № 20
Прописал в листе, нечего не меняется.

А макрос-то запускали после записи? Я на своем проверял -всё работает.
Автор - Udik
Дата добавления - 17.02.2016 в 21:40
dima681 Дата: Среда, 17.02.2016, 22:33 | Сообщение № 25
Группа: Пользователи
Ранг: Новичок
Сообщений: 41
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
у меня тоже работает 5554116.xlsb пароль запрашивает

Дмитрий
 
Ответить
Сообщениеу меня тоже работает 5554116.xlsb пароль запрашивает
Автор - dima681
Дата добавления - 17.02.2016 в 22:33
StoTisteg Дата: Четверг, 18.02.2016, 00:01 | Сообщение № 26
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация: 103 ±
Замечаний: 0% ±

Excel 2010
Цитата Killerlord, 16.02.2016 в 19:53, в сообщении № 18
При снятии защиты он сразу снимает защиту и не требует пароль

А Вы его ставили? Вы просили защиты от случайного изменения, защита без пароля её даёт.

Интуитивно понятный код - это когда интуитивно понятно, что это код.
 
Ответить
Сообщение
Цитата Killerlord, 16.02.2016 в 19:53, в сообщении № 18
При снятии защиты он сразу снимает защиту и не требует пароль

А Вы его ставили? Вы просили защиты от случайного изменения, защита без пароля её даёт.
Автор - StoTisteg
Дата добавления - 18.02.2016 в 00:01
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Возобновление защиты листов при закрытии excel (Формулы/Formulas)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!