Discussion :

[adrien.gendre]

Bonjour je voudrais executer une requête et effectuer des opérations à partir de certains résultats c'est pour cela que je ne choisi pa la méthode d'afficher le résultat directement dans les cellule. De plus j'utilise un lien ODBC dans lequel j'ai rentré le chemin de ma table dans le cas ou elle seré déplacé je ne comprend pas les exemples que je trouve sur internet moi les connection ADOBD.Connection ne marchent pas.
Merci de l'aider

[Invité]

Bonjour

Avec le code cela serait mieux, as-tu ce tuto de Caféine.

Starec

[adrien.gendre]

En fait à chaque fois j'ai une erreur sur ça :

Code :

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

Set cnx = New ADODB.Connection

Déjà il n'est pas par défault dans les listes de propositions VBA

[adrien.gendre]

Non j'ai rien dit lol excuse moi je pense que je trouverais mon bonheur la dedans jvais essayer de décrypter merci.

[adrien.gendre]

J'ai mis ça et il me met une erreur me disant que c'est impossible d'utiliser ODBC pour faire cela. Saurais tu pourquoi ? Merci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
Dim strSQL As String
cnx.Provider = "Microsoft.Jet.Oledb.4.0"
cnx.ConnectionString = "ODBC;DSN=Base_Oriolles"
cnx.Open
 
strSQL = "SELECT CONSFUEL FROM DATATECH WHERE NUMSEQU =  '070601'"
 Dim rst As New ADODB.Recordset
 rst.Open strSQL, cnx
 MsgBox rst.Fields("CONSFUEL")
 rst.Close

[getule]

bonjour
as tu pensé à activer (Microsoft ado ext x.xx for dll and security) dans
outils/références