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

Регистрация

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

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

Страница 2 из 2 « 1 2
Модератор форума: китин, _Boroda_, DrMini

Возобновление защиты листов при закрытии excel (Формулы/Formulas)

Возобновление защиты листов при закрытии excel

Дата: Среда, 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]
После этого кода у меня заработала защита, но защита без пароля. Просто нажимаю снять защиту и пароль не запрашивается.
Если еще идеи как можно это сделать ?

Ответить

Апострофф

Дата: Среда, 17.02.2016, 11:08 | Сообщение № 22

Группа: Проверенные

Ранг: Обитатель

Сообщений: 468

Репутация: 129 ±

Замечаний: 0% ±

Excel 1997

[vba]

Код

Sheets(i).Protect "Пароль"

[/vba]и на всех листах будет указанный Пароль

Ответить

Дата: Среда, 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

Ответить

Дата: Среда, 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

Ответить

Дата: Среда, 17.02.2016, 22:33 | Сообщение № 25

Группа: Пользователи

Ранг: Новичок

Сообщений: 41

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

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

Дмитрий

Ответить

Дата: Четверг, 18.02.2016, 00:01 | Сообщение № 26

Группа: Авторы

Ранг: Старожил

Сообщений: 1161

Репутация: 103 ±

Замечаний: 0% ±

Excel 2010

Цитата Killerlord, 16.02.2016 в 19:53, в сообщении № 18

При снятии защиты он сразу снимает защиту и не требует пароль

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

Интуитивно понятный код - это когда интуитивно понятно, что это код.

Ответить

Возобновление защиты листов при закрытии excel (Формулы/Formulas)

Страница 2 из 2
«
1
2

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