Серый форум — VBS: Как снять пароль из VBScript с листа книги Excel

Re: VBS: Как снять пароль из VBScript с листа книги Excel

2011-04-11T03:27:07Z

Спасибо большое, господин Администратор!
В следующий раз я обязательно воспользуюсь этими кодами.
У Вас так все красиво и наглядно получилось!
А я рада ответу Дмитрия - у меня все работает.

Re: VBS: Как снять пароль из VBScript с листа книги Excel

2011-04-08T14:45:51Z

Lidiya, ознакомьтесь со справкой по BBCode. Я поправил Ваши посты.

Re: VBS: Как снять пароль из VBScript с листа книги Excel

2011-04-08T09:44:51Z

Уважаемый Dmitrii! СПАСИБО огромное! Теперь все работает.

Re: VBS: Как снять пароль из VBScript с листа книги Excel

2011-04-08T09:26:22Z

ExcelApp.Sheets("Лист1").Unprotect Password="123"
То, что выделено красным,- лишнее.

VBS: Как снять пароль из VBScript с листа книги Excel

2011-04-08T08:48:41Z

Уважаемые господа!
Пытаюсь из скрипта открыть книгу EXCEL и снять пароль с листа.

Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.WorkBooks.Open "C:\КнигаExcel.xls"
ExcelApp.Windows("КнигаExcel.xls").Activate
ExcelApp.Sheets("Лист1").Unprotect Password="123"

Выходит сообщение об ошибке:

Неверный пароль. Убедитесь, что отключена клавиша CAPS LOCK и используется правильный регистр. Код 800A03EC. Источник Microsoft Office Excel

Если я ограничиваю команду

ExcelApp.Sheets("Лист1").Unprotect

то выходит окошко с предложением ввести пароль, ввожу спокойно 123 и программа успешно работает.
Подскажите, как автоматизировать этот процесс.

Заранее благодарна за ответ.