Discussion :

[kirua99]

Bonjour,
j'utilise une macro excel pour faire un select et insert dans une base de données SQL server 2005 en local.

en utilisant ceci , cela fonctionne aucun problème.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Sub GetDataFromADO()
    'Declare variables'
        Set objMyConn = New ADODB.Connection
        Set objMyRecordset = New ADODB.Recordset
        Dim strSQL As String
 
    'Open Connection'
 
        objMyConn.ConnectionString = "Server=server;user id=monid; password=monpass;Database=mabase;"
        objMyConn.Open
 
    'Set and Excecute SQL Command'
        strSQL = "select * from dbo.ProductCodeTranslation;"
 
    'Open Recordset'
        Set objMyRecordset.ActiveConnection = objMyConn
        objMyRecordset.Open strSQL
 
    'Copy Data to Excel'
    Dim Feuille2 As Worksheet
    Set Feuille2 = Sheets("feuil2")
        Feuille2.Range("A10").CopyFromRecordset (objMyRecordset)
 
End Sub

Mon erreur est :
échec d'ouverture de la session de l'utilisateur... L'utilisateur n'est pas associé a une connexion SQL server approuvée.
Ma session windows correspond a ma session sql , et j'ai été dans les propriétés , j'ai bien coché mode authentification windows et SQL server.
J'ai bien pris mes identifiants et mon pass de windows , donc je comprends pas pourquoi j'aurai cette erreur.

Est ce qu'il faut configurer SQL pour établir une connexion avec ma macri VBA ? est ce que ma chaine de connexion est fausse ?

merci d'avance pour votre aide

[pc75]

Bonjour,

A première vue, il te manque le driver.
Voilà le type de chaine que j'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
objMyConn.ConnectionString = "Driver={SQL Server};Server=server;database=mabase;uid=monid;pwd=monpass"