[XL-2007] Problème connection automatique

[pascalthomas270961]

Bonjour,

J'ai me suis connecté à l' INFOCENTRE de mon travail via la connection ODBC.
Mon problème est le suivant :
J'ai fait plusieur requête en VBA sur des onglets différents, mais à chaque connection il me demande mon login et mon password de connection à l'INFOCENTRE.
J'aimerai éviter cela, est-il possible de rentrer dans le code VBA la connection en automatique sans qu'il me demande à chaque fois mon password.

Le code VBA actuelle de connection à l'ODBC est le suivant :

With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DSN=dsp_adt;NA=spx-adt,4600;DB=APIDATA;UID=pthomas;", Destination:= _
Sheets("Caract").Range("A1"))

Cordialement et merci

Pascal