Доброго всем дня. Очень надеюсь, что среди знатоков есть специалисты по данному языку.
Проблема у меня следующая. Требуется в vbs-скрипте прописать процедуру открытия книги и запуска макрос. С этим справиться удалось.
Но вот как открыть документ, в режиме редактирования, если стоит соответствующий пароль. Метод vbа
тут не подошел.
Проблема у меня следующая. Требуется в vbs-скрипте прописать процедуру открытия книги и запуска макрос. С этим справиться удалось.
| Код |
|---|
Option Explicit
Dim app, ChangePhonesFolder, ChangePhonesFileName, inChangePhonesFullFileName, InFolderName, objExcel
Dim f, s, b, i, my_time, logs
set objExcel = CreateObject ("Excel.Application")
app="С:\EXT\UnZip.xlsb"
on error goto 0: TI_Avaya()
sub TI_Avaya()
objExcel.Visible = true
objExcel.Workbooks.Open (app)
objExcel.run "Time_Indicators"
objExcel.Workbooks("UnZip.xlsb").Close (true)
objExcel.Quit
end sub |
Но вот как открыть документ, в режиме редактирования, если стоит соответствующий пароль. Метод vbа
| Код |
|---|
objExcel.Workbooks.Open (app, writerespassword:="123") |
Когда испробованы все варианты, я начинаю плясать с бубном. Как правило — помогает.
