Excel macro to open a password protected workbook

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a macro that will open an Excel workbook, The workbook is password
protected and therefore promts me for the password.

I would like the macro to automatically fill in the password and open the
file.

I have tried adding the password to the vba code but it still asks for the
password.

My code is as follows

Workbooks.Open Filename:= _
"C:\Settings.xls", Password:="1234"

I have tried recording a macro while opening the file and entering the
password but it does not show the password in the code.

I am using Windows XP SP2 with Excel 2000 SP3
 
Try this format of the .Open command:

Sub OpenPWProtectedBook()
Workbooks.Open "C:\Settings.xls", , , , "1234"
End Sub

That works for me on a workbook protected against opening without providing
a password with that password. Make sure you have your path to the file
correct also.
 
When I do this, the workbook either opens successfully or I get a runtime error
that says I supplied the wrong password.

And I think that not recording the password is a security measure. If I'm using
your pc to open a top secret workbook and you turned on the macro recorder, then
you could get the password by looking at the recorded code.
 
I tried that command but get the same outcome, it asks for the password.

The file path name is correct and it opens if i type in the password.

If i set an incorrect password in the code it has the same affect.

It seems to ignore the password.

Any ideas??
 
If i set an incorrect password in the code it has the same affect.

It seems to ignore the password.

Any ideas??


How can you get the password to show in the code? when i have turned on the
macro recorder then opened the file inputting the password it does not list
it in the code.
 
For what password are you being prompted?

Is it to open the workbook--or to update the workbook?

If you're being prompted to allow write access:

Workbooks.Open Filename:="C:\Settings.xls", _
Password:="1234", writerespassword:="qwer"

And you have to know the password and type it (them?) into your code.
 
That is exactly what I needed.

Sorry i should have stated that it was the password to modify that i was
after not to open the file.
 
You got lucky <vbg>.

There was another question that asked about the read/write password and I
figured that you must be having a similar problem.

Stephen said:
That is exactly what I needed.

Sorry i should have stated that it was the password to modify that i was
after not to open the file.
 
Follwing code will open pwd protected file if the pwd is right

Dim wk As Workbook
Set wk = Application.Workbooks.Open("C:\test.xls", , , , "testpwd", True)
'True is required for editing the file

wk.Password = "newpwd"
wk.Save
wk.Close

For unprotected files use this and tehn set pwd
Dim wk As Workbook
Set wk = Application.Workbooks.Open("C:\test.xls", True)


wk.Password = "newpwd"
wk.Save
wk.Close
 
any idea??
I have a macro that will open an Excel workbook, The workbook is password
protected and therefore promts me for the password.

I would like the macro to automatically fill in the password and open the
file.

I have tried adding the password to the vba code but it still asks for the
password.

My code is as follows

Workbooks.Open Filename:= _
"C:\Settings.xls", Password:="1234"

I have tried recording a macro while opening the file and entering the
password but it does not show the password in the code.

I am using Windows XP SP2 with Excel 2000 SP3
 
Back
Top