Kevin H. Stecyk...
Setting Password & WriteResPassword

Once I have opened a workbook that is Password protected and
WriteResPassword protected, how do I then save the workbook with a new
Password and WriteResPassword?

I know to open a workbook it is simply:

Workbooks.Open Filename:="MyBook.xls", Password:="TopSecret1",
WriteResPassword:="TopSecret2"

I thought Workbooks("MyBook.xls").Close would have the same properties.
But it doesn't.

Any guidance is appreciated.

Regards,
Kevin


ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Junk\DeleteBook.xls", FileFormat _
:=xlNormal, Password:="delete", WriteResPassword:="delete", _
ReadOnlyRecommended:=True, CreateBackup:=False