[решено] VB, открытие защищенного паролем Excel файла

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)

- - [решено] VB, открытие защищенного паролем Excel файла (http://forum.oszone.net/showthread.php?t=269956)

meateron

14-10-2013 21:25 2234445

VB, открытие защищенного паролем Excel файла

Код:

    Private Sub OK_Click(sender As Object, e As EventArgs) Handles OK.Click

        Dim objXL, objWorkbook

        objXL = CreateObject("Excel.Application")

        objXL.Visible = True

        objWorkbook = objXL.Workbooks.Open("C:\1.xlsx")



        ?????



    End Sub

Имеем пароль например "1", каким образом его использовать для открытия защищенного файла?

Поборолся с objWorkbook.Unprotect, не победил синтаксис :(

Iska	14-10-2013 23:57 2234528

Цитата:

Цитата meateron

Имеем пароль например "1", каким образом его использовать для открытия защищенного файла? »

Excel Workbook Open - Поиск в Google → Workbooks.Open Method (Excel). Внимательно читаете, пока не увидите в параметрах слово «password».

meateron

15-10-2013 19:58 2235050

хм......не понимаю как его применять. objXL.Password = "1" ничего не делает, хотя следуя логике, тот же самый objXL.Visible = True при смене на False работает и не показывает окно Excel'я.
если это аргумент для метода .Open, то objXL.Workbooks.Open("C:\1.xlsx", , , "1") тоже не приносит желаемого результата.

смущает меня наличие в примерах лишь кода для VBA....(код под VB делаю....)

а всё, 1 запятую забыл в то objXL.Workbooks.Open("C:\1.xlsx", , , "1")

Время: 20:14.