Is there a way, given a file's path & name, to determine if it is a password
protected Excel workbook?

And, if it is a password protected workbook, can I open it from VBA using
that password, so I can modify it and save it from VBA?

Thanks,
Ken

Sub OpenProtectedFile()
Dim wb As Workbook
Dim ws As Worksheet
Set wb = Workbooks.Open("C:\Password Protected File.xls", , , ,
"password1", "password2")
Set ws = wb.Sheets("Sheet1")
ws.Activate
ws.Cells(1, 1).Value = "Modified by VBA"
End Sub

"Ken Loomis" schreef in bericht
...
Is there a way, given a file's path & name, to determine if it is a
password protected Excel workbook?

And, if it is a password protected workbook, can I open it from VBA using
that password, so I can modify it and save it from VBA?

Thanks,
Ken