Показать полную графическую версию : [решено] VB, открытие защищенного паролем Excel файла
meateron
14-10-2013, 21:25
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, не победил синтаксис :(
Имеем пароль например "1", каким образом его использовать для открытия защищенного файла? »
Excel Workbook Open - Поиск в Google (https://www.google.ru/search?q=Excel+Workbook+Open&ie=utf-8&oe=utf-8&rls=org.mozilla:ru:official&client=firefox-a&gws_rd=cr&ei=R0xcUtnJD4SG4ATro4GYCQ) → Workbooks.Open Method (Excel) (http://msdn.microsoft.com/en-us/library/office/ff194819.aspx). Внимательно читаете, пока не увидите в параметрах слово «password».
meateron
15-10-2013, 19:58
хм......не понимаю как его применять. 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")
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.