Discussion :

[romrai]

Salut à tous,

j'ai un problème avec une requête sous VBA. Voici la ligne de code:

Code :

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

1
2
 
Set Result = dB_ZinstalNF.CreateQueryDef("Requête", "SELECT * FROM [ZinstalNF]  WHERE (([ZinstalNF].[Nom_Assist]) = [" & Val_I & "])")

en fait Val_I contient la valeur qui doit être extraite. le code marche bien (il lit bien la valeur qui se trouve dans Val_I). Mais lorsque j'essaie d'ouvrir ma requête, une boite de message s'affiche me demandant d'Entrer la valeur du paramètre.

Si quelqu'un à une idée!

Merci à tous

[pgz]

Bonjour,

Val_I est un objet de quel type?

A+

pgz

[romrai]

salut,

Val_I est une variable de type Variant

Merci encore pour ton aide

[romrai]

erratum!!

il est de type String

[pgz]

Re,

Soit tu laisses les crochets autour de Val_I et tu passes une référence, c-a-d le nom d'un paramètre, et c'est normal qu'access te demande ensuite ce paramètre;
soit tu veux passer la valeur contenue dans Val_I et il faut que tu remplaces les crochets par des apostrophes.

Enfin, c'est juste mon avis...

Bon courage,

pgz

[romrai]

j'ai essayé, mais ça ne marche pas.

[romrai]

Salut,
j'ai trouvé la réponse à mon problème; il me manquait des côtes à ma variable. voilà la requête qui marche, si ça peut aider quelqu'un

Code :

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

Set Result = dB_ZinstalNF.CreateQueryDef("Requête", "SELECT * FROM [ZinstalNF]  WHERE (([ZinstalNF].[Nom_Assist]) = ' " & Val_I & " ')")

Merci encore pour l'aide