VPF::Поставить защиту с паролем на лист

temr

Дата 22.1.2008, 11:04 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 47
Регистрация: 30.3.2006

Репутация: нет
Всего: нет

Добрый день Всем!
Стоит следующая задача необходимо поставить защиту листа от изменения с паролем на все листы книги .
Как сделать защиту на все листы без пароля я разобрался а как в макросе прописать пароль на защиту каждого листа в этом проблема

Заранее благодарю за ответы
Тимур

abyrval

Дата 22.1.2008, 11:33 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 28.6.2007

Репутация: нет
Всего: нет

например

Код


ActiveSheet.Protect Password:="123", DrawingObjects:=True, [Contents:=True, Scenarios:=True, UserInterfaceOnly:=True 
ActiveSheet.Unprotect "123"

а это список возхможных аргументов:

Код


.Protect([Password], [DrawingObjects], [Contents], [Scenarios], [UserInterfaceOnly], [AllowFormattingCells], [AllowFormattingColumns], [AllowFormattingRows], [AllowInsertingColumns], [AllowInsertingRows], [AllowInsertingHyperlinks], [AllowDeletingColumns], [AllowDeletingRows], [AllowSorting], [AllowFiltering], [AllowUsingPivotTables])

temr

Дата 22.1.2008, 11:48 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 47
Регистрация: 30.3.2006

Репутация: нет
Всего: нет

abyrval, спасибо

mihanik

Дата 23.1.2008, 21:08 (ссылка)

(нет голосов)

Загрузка ...

-=Белый Медведь=-

Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 9
Всего: 109

Помечу решённым!!!

--------------------

Программистами не рождаются, - это родовая травма...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Программирование, связанное с MS Office \| Следующая тема »