Bonsoir à tous,
je cherche à faire apparaitre dans une textbox dans une USF dans un classeur Excel, le premier nom rencontré commençant par "e" dans le champ "Identité" d'une base de données access...
le code utilisé:
vSQL = "select * from " & vTable & "where" & Identité = "Comme 'e*'"
vdonnées.Open vSQL, vBasededonnees, adOpenStatic, adLockReadOnly
relation_bd.ident = vdonnées("Identité")
qqes explications:
vTable est la table où se trouvent les données en question
Identité est le champ ou se trouvent les noms de la liste
relation_bd est le nom de l'USF dans mon classeur Excel
ident est le nom de la textbox de l'USF
Le lancement de la macro retourne un message d'erreur: "instruction SQL non valide; 'DELETE',' INSERT', 'PROCEDURE', 'SELECT' ou 'UPDATE' attendus."
PS bien entendu les bibliothèques adéquates sont activées, la liaison avec la base de données sont effectuées....
Mon problème se situe visiblement dans la Syntaxe de la requète...
Merci aux bonnes âmes qui pourraient m'aider.
A+
Philippe
je cherche à faire apparaitre dans une textbox dans une USF dans un classeur Excel, le premier nom rencontré commençant par "e" dans le champ "Identité" d'une base de données access...
le code utilisé:
vSQL = "select * from " & vTable & "where" & Identité = "Comme 'e*'"
vdonnées.Open vSQL, vBasededonnees, adOpenStatic, adLockReadOnly
relation_bd.ident = vdonnées("Identité")
qqes explications:
vTable est la table où se trouvent les données en question
Identité est le champ ou se trouvent les noms de la liste
relation_bd est le nom de l'USF dans mon classeur Excel
ident est le nom de la textbox de l'USF
Le lancement de la macro retourne un message d'erreur: "instruction SQL non valide; 'DELETE',' INSERT', 'PROCEDURE', 'SELECT' ou 'UPDATE' attendus."
PS bien entendu les bibliothèques adéquates sont activées, la liaison avec la base de données sont effectuées....
Mon problème se situe visiblement dans la Syntaxe de la requète...
Merci aux bonnes âmes qui pourraient m'aider.
A+
Philippe