1

Тема: VBS: Открыть скриптом зарезервированный xlsm файл

Добрый день!
Имеется необходимость открыть, сохранить и закрыть файл xlsm. Проблема в том, что файл зарезервирован другим пользователем, хотя он скопирован на локальный компьютер и никто не может его держать. Тем не менее для открытия он просит пароль. В сети есть информация как скриптом открыть запароленый файл, но вот как открыть зарезервированный - не нашел.  Сообщение вида "Файл 11.xlsm зарезервирован Васей Пупкиным. Введите пароль разрешения записи или откройте в режиме Только для чтения". Приходится ежедневно его открывать и вводить пароль руками.
Заранее благодарен.

2

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Можно сам файл?

3

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Если правильно понял.http://s019.radikal.ru/i620/1701/4e/3c72e2f66edb.jpghttp://s008.radikal.ru/i306/1701/89/dcd6ad1dba7f.jpghttp://s019.radikal.ru/i613/1701/4a/bf4efac0e3fc.jpg

Сохранить как - Сервис -  Общие параметры - Снять галку "Рекомендовать доступ только для чтения "

4 (изменено: tolikvak, 2017-01-10 19:08:08)

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Пароль установлен через Файл - Сохранить как - Сервис - Общие параметры - Пароль для изменения.
Я не могу устанавливать/снимать галки или как - либо менять файл (хотя данная галка не установлена). Файл очень большой с кучей производственных данных и данные вводятся кучей народа. Я эту информацию выкачиваю средствами SQL Server, но ввиду разных версий MS Offie у пользователей, периодически возникают проблемы. Решение этой проблемы это открыть и нажать кнопку "Сохранить", после чего, файл корректно считывается. Хотелось бы автоматизировать данную процедуру. Аналог файла прикрепляю. Пароль 555

Post's attachments

Microsoft Excel Worksheet.xlsx 7.82 kb, 10 downloads since 2017-01-10 

You don't have the permssions to download the attachments of this post.

5

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Gnumeric и LibreOffice Calc такой файл без пароля открывают.

6 (изменено: red2881, 2017-01-10 23:19:13)

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Так и не понял что нужно.  Если снять пароль совсем....

Set objExcel=CreateObject("Excel.Application") 
  objExcel.Visible=False
  fileName = "Путь_к_Файлу\Название_файла_без_пробелов.xlsx"
  excelpwd="555"
Set oWorkbook=objExcel.Workbooks
Set myWkbook=objExcel.Workbooks.open (fileName,0,False,5,excelpwd,excelpwd)
  objExcel.DisplayAlerts=False
For Each wSheet in objExcel.Workbooks
  wSheet.SaveAs "Путь_к_Файлу\Название_файла_без_пробелов2.xlsx",,"",""
Next
  objExcel.Workbooks.Close
  objExcel.Quit
Set oWorkbook=Nothing
Set objExcel=Nothing  

7

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Да нет, здесь просто открыть нужно:

XLSX = "C:\Тест\Microsoft Excel Worksheet.xlsx"
PASS = 555

With CreateObject("Excel.Application") 
  .Workbooks.Open XLSX, 0, False, 5,, PASS
  .Visible = True
End With

8 (изменено: tolikvak, 2017-01-11 13:05:57)

Re: VBS: Открыть скриптом зарезервированный xlsm файл

Задача выполнена и протестирована. Нужно было открыть с вводом пароля на изменение, ничего не менять, сохранить и закрыть. Flasher и red2881, спасибо, из Ваших примеров собрал свой.