Erreur requête SQL en VBA dans Excel
Bonjour :)
j'ai beau regarder tous les sujets du net à propos de cette erreur : "Aucune valeur donnée pour un ou plusieurs des parametres requis"
je n'arrive pas à la résoudre.
je tente une connexion à un classeur fermé excel qui contient deux feuilles : Temp et Tempsecteur
chacune des deux feuilles contient des données avec les colonnes suivantes
Temp : | Num commune| Num client | Code rue |
Tempsecteur : |test red | code entier | Code_commune | Code_rue |
Mon code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Set cn = New ADODB.Connection
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=" & emplacement & _
";Extended Properties=""Excel 8.0;HDR=No;IMEX=1;"""
.Open
End With
texte_SQL = "SELECT * FROM [Temp$],[Tempsecteur$] Where [Temp$].[Num commune] = [Tempsecteur$].[Code_commune] and [Temp$].[Code rue] = [Tempsecteur$].[Code_rue] "
Set Rst = New ADODB.Recordset
Set Rst = cn.Execute(texte_SQL) 'Ligne ou l'erreur apparaît |
Je ne sait pas d'où vient le problème... Certaines colonnes possède des espaces :roll: (je précise que ce n'est pas moi qui ai créé la base de donnée d'où proviennent ces tables), c'est pour cela que j'ai tout mis entre crochet. Mais même si je tente de renommer les colonnes avant ma requête afin qu'il n'y ai plus d'espace, la même erreur arrive :(
si quelqu'un à une idée...
