Include password in formula that links to a protected excel file

[Guest]

I have a master spreadsheet that links to other spreadsheets with passwords.
I want to write the password in the formula that links to the other
spreadsheets in order to avoid entering the password manually each time when
prompt by excel for the passwords of my links.

Thanks, Pat.

 

[Guest]

You never said which password so i've assumed password to open.

Sub liminaladvertising()
Path = "C:\"
fname = "Testbook.xls"
Pass = "mypass"
Set mybook = Workbooks.Open(Path & fname, Password:=Pass)
End Sub

Mike