Настройка функции зашифровать документ в word 2010

[wedmac]

Здравствуйте.
Есть такая возможность в word 2010 зашифровать документ на определенный пароль.

Задача
Мне собственно нужно:
1. Когда пользователь вводит пароль для шифрования там должны быть кнопочка которая откроет новую форму с настройками на ввод пароля. Например его длинны, символов, регистра и т.д.
ЛИБО
2. Если по какой то причине первый пункт сделать невозможно, то мне надо написать макрос и поместить его на панель нажимая на который открывается форма с просьбой ввести пароль и настройки к нему.

Проблема
Сколько ни гуглю не могу найти как это сделать, ни даже как называется свойство которое позволяет задавать пароль.

Нашел только как ограничить редактирование ThisDocument.Protect

Вопрос
Собственно подскажите можно ли внести изменения в стандартную функцию word "зашифровать документ" и как называется свойство (и к какому объекту относится) которое позволяет зашифровать документ на пароль?



Дополнение
Вообщем пока ждал ответа нашел его сам, но не полностью, а только на пунк 2. Я смог написать макрос который задает пароль для документа.
Вот код

Sub тест()
'
' тест Макрос
'
'
ActiveDocument.Password = "пароль"
ActiveDocument.Save
MsgBox ActiveDocument.HasPassword
End Sub

Как оказалось почему то не работает установка пароля с функцией ThisDocument.Password

Вообщем вопрос можно ли изменить саму форму "зашифровать паролем"? остается актуальным