Requête SQL sous VBA - Between

Bonjour a tous,

J'essaye actuellement de créer une base de données pour répertorier toutes les plantes que notre service utilise pour ses aménagements publics.

Pour faciliter le choix des essences végétales par les membre de l'équipe qui n'ont pas étudier les plantes je fais des formulaires de recherche spécifique.

Ces formulaire sont inspiré par le tutoriel de ce site sur les recherche multi-critère. (très bien fait! merci a l'auteur).
Dans un de mes formulaires j'aimerais pouvoir lancer une recherche sur la grandeur de la plante ou l'utilisateur entre les valeurs min et max.

J'ai essayé comme suit:

Code:

---

1 2 3 4 5 6 7 8 9 10

Public Sub RefreshQuery() Dim SQL As String   SQL = "SELECT Identité.ID, Identité.[nom latin], Identité.type, Identité.feuillage, Identité.exposition FROM Identité INNER JOIN utilisation ON Identité.ID = utilisation.ID WHERE Identité.ID<>0" If chkTail = -1 Then SQL = SQL & "And Identité.hauteur Between " & Me!TailMin & " And " & Me!TAilMax End If SQL = SQL & " ORDER BY Identité.[nom latin];" Me.lstResult.RowSource = SQL Me.lstResult.Requery

---

Malheureusement je dois avoir un problème de syntaxe car il me retourne aucune plante qu'importe les valeurs entrées.
Quelqu'un voit-il comment règler mon problème?
merci

Citation:

---

Malheureusement je dois avoir un problème de syntaxe car il me retourne aucune plante qu'importe les valeurs entrées.

---

Regarde le tuto dans ma signature, je pense qu'il t'aidera à résoudre le bug de cette requête.

En espérant t'aider.

Merci,

Avec ton debug print j'ai pu constater que l'erreur était plus que stupide il manquait un espace devant la premier And :oops:
Du coup ca fonctionne.

Juste une précision tout de même pourquoi quand je veux entrer des nombre decimaux il ne les comprend que quand je lui met des . alors qu'il me les affiche dans la table avec des , et que le . de mon clavier numérique inscrit d'office une , :? c'est un peu chinois je sais!

Y a t'il un moyen de lui faire comprendre que le . du clavier numérique est un . et non une , ?

En utilisant ce dcount, cela me donne le nombre de résultats ....

Code:

---

1 2

t = DCount("nr", "t_rendezvous", "horairedebut between #" & Format(DateRdV1, "mm/dd/yyyy") & " " & HoraireD & "# and #" & Format(DateRdV2, "mm/dd/yyyy") & " " & HoraireF & "# or horairefin between #" & Format(DateRdV1, "mm/dd/yyyy") & " " & HoraireD & "# and #" & Format(DateRdV2, "mm/dd/yyyy") & " " & HoraireF & "#") MsgBox t

---

Je pensais qu'en ajoutant

Code:

---

"select * from t_rendezvous where horairedebut between #" & Format(DateRdV1, "mm/dd/yyyy") & " " & HoraireD & "# and #" & Format(DateRdV2, "mm/dd/yyyy") & " " & HoraireF & "# or horairefin between #" & Format(DateRdV1, "mm/dd/yyyy") & " " & HoraireD & "# and #" & Format(DateRdV2, "mm/dd/yyyy") & " " & HoraireF & "#;"

---

Cela fonctionnerait ... mais non ....:cry::cry: