Как поставить на файл Word пароль?

[streamstr]

Видел похожие темы, но не совсем то, что нужно, поэтому решил создать новую. Задача в следующем: Есть вордовский файл, надо с помощью VBA сделать так, чтобы при его открытии вылезала форма с просьбой выбрать имя пользователя из комбо-бокса, и ввести в текстовое поле пароль. При верном вводе файл должен открыться. Как бы это сделать?

[viter.alex]

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

[streamstr]

Спасибо больщое, все работает!

[viter.alex]

А как ты собираешься задавать имена пользователей? Это же я пример сделал. Имена пользователей хранятся в переменных документа. Там еще нужно кнопку добавить для ввода нового пользователя или как-то еще это решить.
И, повторюсь, с выключенными макросами ничего работать не будет и документ откроется.
Можно подумать, конечно, как менять пароль на открытие документа до его открытия пользователю…
Может кто из гуру подкинет идею?

[EducatedFool]

как менять пароль на открытие документа до его открытия пользователю…

В Excel, к примеру, подобная задача реализуется очень просто - без включения макросов пользователь увидит только пустой лист, а все нужные листы будут скрыты.
Если макросы включены, то запрашивается пароль, и нужные листы отображаются, а пустой скрывается.
При каждом сохранении файла производится обратная операция.

Объектную модель Word-а я не знаю (есть ли там возможность макросом блокировать отдельные участки документа), но могу предложить другой вариант реализации.
Но для этого понадобятся 2 файла...

1 файл - основной документ. Он запаролен, причём в пароле можно использовать непечатаемые символы.
Без макросов (вручную) его вообще никак не открыть.
(программы для взлома паролей мы сейчас не обсуждаем)

2 файл - что-то вроде страницы доступа к основному файлу.
Текста в нём нет - есть только код.
Открыв его без макросов, мы ничего не добьёмся - увидим только чистый лист.
Открыв же его с включенными макросами, мы увидим запрос на открытие основного файла, где будет предложено ввести логин и пароль.
И, если всё введено правильно, макрос из этого 2-го файла сам открывает первый файл (основной), используя сложный пароль с непечатаемыми символами (программно, как известно, можно ввести почти любой пароль)

Других вариантов решения в случае с документами Word я не знаю...

[viter.alex]

Это выход.

[eldarik]

а если это файл txt?

[Aent]

eldaric, если это файл txt вас спасёт WinRar с длинным паролем
viter.alex, можно попробовать следующую игрушечную схему:
1) устанавливаем для всего документа .font.hidden = true
2) устанавливаем для всего документа режим "только для чтения" c
непечатным паролем
ActiveDocument.Protect Password:=".....", Type:=wdAllowOnlyReading, ...
3) добавляем в обработку открытия макрос, снимающий пароль и восстанавливающий читаемость документа и в обработку закрытия -
восстановление "защиты"