[b]Application.FollowHyperlink Password dilemma [/b] 1

[trystanhuwwilliams1]

Hi,

Don't know if this is possible, but here goes..
I want to open password protected Excel Workbooks from
an Access Form via the code below.

strPath = "Dir\Path" & "\" & rs("file").Value
Application.FollowHyperlink strPath, , True, False

This works except that it won't allow a password to be entered in the code. Does anyone know is this can be done?


Also, I found a strange phenomenon which occurred whilst I was experimenting in this area. When I added the Microsoft Excel 9.0 Object Library to the VBA Access references, and then used the following code:

Workbooks.Open (strPath), , , , "password"

I found that this opened the Workbook virtually. I could access data using cell references etc without being able to physically see the workbook.

Could be useful to someone, I don't know.

Regards,

Trystan

 

[PHV]

myXL.Workbooks.Open (strPath), , , , "password"
myXL.Visible = True

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[trystanhuwwilliams1]

Sorry, how do I define 'myXL'?

 

[PHV]

Set myXL = CreateObject("Excel.Application")
myXL.Workbooks.Open strPath, , , , "password"
myXL.Visible = True

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[trystanhuwwilliams1]

Ahh, I see. Thank you.