Bonjour à tous,
Je suis sur Excel et j'essaie de créer un code VBA permettant de créer une requête SQL qui sera "injectée" dans SQL Server. Puis, toujours dans mon programme VBA, on récupère le résultat de la requête SQL.
Voici le code que j'ai fait:
En exécutant ce code, j'ai le message d'erreur suivant "Erreur d'exécution '3704' Cette opération n'est pas autorisée si l'objet est fermé." J'ai cette erreur sur la ligne de code
. A quoi cela est due? Je n'arrive pas à trouver la réponse sur internet.
Merci d'avance de votre aide,
Je suis sur Excel et j'essaie de créer un code VBA permettant de créer une requête SQL qui sera "injectée" dans SQL Server. Puis, toujours dans mon programme VBA, on récupère le résultat de la requête SQL.
Voici le code que j'ai fait:
Code:
Public Sub connexion_SQL_server()
Dim SQL_String As String
Dim cN As ADODB.Connection
Dim recset As ADODB.Recordset
Set cN = New ADODB.Connection
Set recset = New ADODB.Recordset
cN.ConnectionString = "Provider=SQLOLEDB; Data Source=chbase; UID=id1;PWD=confi;"
cN.Open ConnectionString
SQL_String = "SELECT * FROM tableClient "
recset.Open SQL_String, cN
Dim total
total = 0
recset.MoveFirst
While Not recset.EOF = True
'N-1
If recset.Fields(2) = 5983 Then
MsgBox "ok"
End If
recset.MoveNext
Wend
recset.Close
End Sub
En exécutant ce code, j'ai le message d'erreur suivant "Erreur d'exécution '3704' Cette opération n'est pas autorisée si l'objet est fermé." J'ai cette erreur sur la ligne de code
Code:
recset.MoveFirst
Merci d'avance de votre aide,
Dernière édition: