Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Открыть файл в режиме для записи при рекомендации для чтения - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Открыть файл в режиме для записи при рекомендации для чтения (Макросы/Sub)
Открыть файл в режиме для записи при рекомендации для чтения
Alenka546 Дата: Среда, 01.09.2021, 12:29 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день!
Прошу помощи.
Есть кнопка, к которой прикручена процедура Zapusk(), которая показывает форму с параметрами запуска отчета и запускает приватную процедуру Formirivanie(), которая формирует отчет.
Чтобы пользователи ничего не поломали, при открытии стоит пароль на изменение (т.е. пользователи открывают для чтения и жмут кнопку).

Задача: автоматически формировать и сохранять отчет в определенное время.
Выбранное решение: Процедура AutoExec() определяет параметры автоматического запуска и вызывает Zapusk(). В планировщике задач в определенное время вызывается скрипт vbs, который запускает AutoExec.
[vba]
Код
Set NewExcel = CreateObject("Excel.Application")
with NewExcel
    .Visible = False 'True '
    .Workbooks.Open("S:\...\Отчет.xlsm")
    .Run "AutoExec"
    .ActiveWorkbook.Close
    .Quit
end with
set NewExcel = Nothing
[/vba]
Проблема: появляется окно для ввода пароля для записи.
Подскажите,
1) как ввести пароль в vbs?
2) если стоит не пароль, а галка "Рекомендовать доступ только для чтения" и при открытии появляется окно "Автор рекомендует открывать файл только для чтения. Открыть для чтения? Да/Нет/Отмена" - как выбрать "нет"?

Нагуглить обход на VBA тоже не получилось %)
 
Ответить
СообщениеДобрый день!
Прошу помощи.
Есть кнопка, к которой прикручена процедура Zapusk(), которая показывает форму с параметрами запуска отчета и запускает приватную процедуру Formirivanie(), которая формирует отчет.
Чтобы пользователи ничего не поломали, при открытии стоит пароль на изменение (т.е. пользователи открывают для чтения и жмут кнопку).

Задача: автоматически формировать и сохранять отчет в определенное время.
Выбранное решение: Процедура AutoExec() определяет параметры автоматического запуска и вызывает Zapusk(). В планировщике задач в определенное время вызывается скрипт vbs, который запускает AutoExec.
[vba]
Код
Set NewExcel = CreateObject("Excel.Application")
with NewExcel
    .Visible = False 'True '
    .Workbooks.Open("S:\...\Отчет.xlsm")
    .Run "AutoExec"
    .ActiveWorkbook.Close
    .Quit
end with
set NewExcel = Nothing
[/vba]
Проблема: появляется окно для ввода пароля для записи.
Подскажите,
1) как ввести пароль в vbs?
2) если стоит не пароль, а галка "Рекомендовать доступ только для чтения" и при открытии появляется окно "Автор рекомендует открывать файл только для чтения. Открыть для чтения? Да/Нет/Отмена" - как выбрать "нет"?

Нагуглить обход на VBA тоже не получилось %)

Автор - Alenka546
Дата добавления - 01.09.2021 в 12:29
bmv98rus Дата: Среда, 01.09.2021, 13:25 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3656
Репутация: 649 ±
Замечаний: 0% ±

Excel 2013/2016
https://docs.microsoft.com/en-us/office/vba/api/excel.workbooks.open

1.[vba]
Код
.Workbooks.Open("S:\...\Отчет.xlsm",,,,PASSWORD)
[/vba]
2.
[vba]
Код
.DisplayAlerts = False
.Workbooks.Open "c:\temp\11111.xlsx"
.DisplayAlerts = True
[/vba]


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Среда, 01.09.2021, 13:35
 
Ответить
Сообщениеhttps://docs.microsoft.com/en-us/office/vba/api/excel.workbooks.open

1.[vba]
Код
.Workbooks.Open("S:\...\Отчет.xlsm",,,,PASSWORD)
[/vba]
2.
[vba]
Код
.DisplayAlerts = False
.Workbooks.Open "c:\temp\11111.xlsx"
.DisplayAlerts = True
[/vba]

Автор - bmv98rus
Дата добавления - 01.09.2021 в 13:25
Alenka546 Дата: Среда, 01.09.2021, 15:49 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
bmv98rus, спасибо за наводку! Собиралась написать, что пробовала password и не помогло, а оказалось что файл висит в фоновом приложении, и поэтому он и открывался только для чтения (тупиццо).
Зато благодаря вашей ссылке на матчасть нашла параметр IgnoreReadOnlyRecommended, который и ответил на мой второй вопрос.
Спасибо за подсказку и время!
 
Ответить
Сообщениеbmv98rus, спасибо за наводку! Собиралась написать, что пробовала password и не помогло, а оказалось что файл висит в фоновом приложении, и поэтому он и открывался только для чтения (тупиццо).
Зато благодаря вашей ссылке на матчасть нашла параметр IgnoreReadOnlyRecommended, который и ответил на мой второй вопрос.
Спасибо за подсказку и время!

Автор - Alenka546
Дата добавления - 01.09.2021 в 15:49
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Открыть файл в режиме для записи при рекомендации для чтения (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования Jobsora jooble
© 2010-2021 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!