Bonjour

Je cherche à récupérer des données d'une base de données access. Malgré mon bon vouloir et mes nombreuses recherches, je n'y arrive toujours pas.

Voici le code que j'ai écrit

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
Function GetInfo(U As String, T As String, S As String)

Dim sql As String
Dim acApp As Access.Application
Dim chemin As String
Dim nmt As String

xml = Value1
'nom de la table
nmt = Value2
' Démarrer Access
Set acApp = New Access.Application
 
' Ouvrir la base de données concernée
acApp.OpenCurrentDatabase (chemin & "nom.mdb")


    
    sql = "SELECT C FROM  [" & nmt & " ] WHERE S = " & Chr(34) & U & Chr(34) & " and Sc=" & Chr(34) & S & Chr(34)
        
        Get Info=currentDb.execute(sql)
End Function
Par contre vba n'a pas trop l'air d'accord avec la ligne rouge. sauriez vous pourquoi? en plus, lorsqu'il exécute la requête sql, il ne trouve pas la table. l'aurais je mal désignée?

Merci pour votre aide