Conexão com Access em Excel, Banco com Senha!

[Soteras]

Boa Tarde Pessoal,

tenho um código VBA que acessa um banco em Access com senha de uauário... hoje estou utilizando a seguinte String:

Set cn = New ADODB.Connection

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\glbvgfil01\ger_sac$\Gerencia Churn\Processos de Churn\YKS\yks.mdb;Password=ykschurn;"

cn.Open

Porém da erro dizendo: Não é possível iniciar o aplicativo, O Arquivo de Informações do grupo de trabalho esta faltando, ou foi aberto em modo exclusivo por um outro usuário.

já tentei adicionar o User uid = Admin, tentei com:

Workgroup (system database) specifying username and password

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;Jet OLEDB:System Database=system.mdw;User ID=myUsername;Password=myPassword;

Porém não funcionou...

trata-se de uma aplicação simples em excel.

[Macêdo]

Tente:

cnn.ConnectionString = "provider = microsoft.jet.oledb.4.0;" & _

"data Source = C:\BD.mdb; jet OLEDB:Database Password=minha_senha"

cnn.CursorLocation = adUseClient

cnn.Open