VBA ADO connection string to excel with workbook password

[nd0911]

Hello,

I'm looking for the right ADO connection string to use inside a Excel workbook (with VBA) to another workbook with a "workbook password".

I'm using this connection string, and it works only when the workbook is without the password

"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & MyPath & ";Extended Properties=""Excel 12.0;HDR=YES"";"

Is it possible ?

Thank you.

 

[Domenic]

I think you'll need to first open the workbook using the Open method of the Workbooks object...

Dim wb As Workbook
Set wb = Workbooks.Open(Filename:="PathAndFilename", Password:="MyPassword")

...and then connect to your workbook using ADO.

Hope this helps!

 

[nd0911]

Thank you Domenic but I dont want to open the file.

Is it possible to do it without open the file anyone ?

 

[Domenic]

I don't know whether it's possible, but you can prevent the workbook from being visible by setting screen updating to false before opening and connecting to your workbook, and then setting it back to true once you've finished...

Application.ScreenUpdating = False

'your code

Application.ScreenUpdating = True