OVH Cloud OVH Cloud

valeur de ouinon et liste deroul

12 réponses
Avatar
Sergio
Bonjour à tous

Est ce que je me trompe si je dis que la valeurchp en sortie dans une
recherche est :
A - champ (oui/non) valeurchp est (-1 ou 0)
B - champ avec (liste déroulante imposée) valeurchp est (de 1 à longueur de
liste)

Par exemple dans ce type de formule :
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" &
Valeurx)

parceque quoi que je fasse, je reçoit le message :
"Opérateur absent"

Si cela peut être parlant pour quelqu'un ?

A+ Sergio.

10 réponses

1 2
Avatar
Sergio
Pardon
J'ai plutot "type de données incompatibles dans l'expression du critere"

"Sergio" a écrit dans le message de news:

Bonjour à tous

Est ce que je me trompe si je dis que la valeurchp en sortie dans une
recherche est :
A - champ (oui/non) valeurchp est (-1 ou 0)
B - champ avec (liste déroulante imposée) valeurchp est (de 1 à longueur
de

liste)

Par exemple dans ce type de formule :
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" &
Valeurx)

parceque quoi que je fasse, je reçoit le message :
"Opérateur absent"

Si cela peut être parlant pour quelqu'un ?

A+ Sergio.




Avatar
Jessy SEMPERE
Bonjour

Peux-tu nous donner le code complet ?

Sinon si Valeurx est du texte le problème vient sûrement de là...
Si c'est le cas, tu peux essayer :

res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "='" &
Valeurx & "'")

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Sergio" a écrit dans le message news:

Bonjour à tous

Est ce que je me trompe si je dis que la valeurchp en sortie dans une
recherche est :
A - champ (oui/non) valeurchp est (-1 ou 0)
B - champ avec (liste déroulante imposée) valeurchp est (de 1 à longueur
de

liste)

Par exemple dans ce type de formule :
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" &
Valeurx)

parceque quoi que je fasse, je reçoit le message :
"Opérateur absent"

Si cela peut être parlant pour quelqu'un ?

A+ Sergio.




Avatar
Sergio
Voila ce que j'ai fait (j'ai aussi essayé avec le "'" final)

Les colonne de la requête tst_R sont
0 = numéroauto
1 = numérique
2 = Oui/non
3 = Liste déroulante

Public Sub Tests()
Dim DB As DAO.Database
Dim qd As DAO.QueryDef
Dim res, valeurx, col As Long

Set DB = CurrentDb
Set qd = DB.QueryDefs("tst_R")
For col = 1 To 3
For valeurx = -1 To 5
'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" &
valeurx)
'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
MsgBox "Nb de " & valeurx & " = " & res
Next valeurx
Next col
End Sub

A+ Sergio

"Jessy SEMPERE" a écrit dans le message de news:
brprgh$rsd$
Bonjour

Peux-tu nous donner le code complet ?

Sinon si Valeurx est du texte le problème vient sûrement de là...
Si c'est le cas, tu peux essayer :

res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "='" &
Valeurx & "'")


Avatar
Jessy SEMPERE
Re,

"Sergio" a écrit dans le message news:

Voila ce que j'ai fait (j'ai aussi essayé avec le "'" final)


attention, il y avait une apostrophe avant aussi...

res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "='" &
Valeurx & "'")

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------

Les colonne de la requête tst_R sont
0 = numéroauto
1 = numérique
2 = Oui/non
3 = Liste déroulante

Public Sub Tests()
Dim DB As DAO.Database
Dim qd As DAO.QueryDef
Dim res, valeurx, col As Long

Set DB = CurrentDb
Set qd = DB.QueryDefs("tst_R")
For col = 1 To 3
For valeurx = -1 To 5
'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" &
valeurx)
'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
MsgBox "Nb de " & valeurx & " = " & res
Next valeurx
Next col
End Sub

A+ Sergio

"Jessy SEMPERE" a écrit dans le message de
news:

brprgh$rsd$
Bonjour

Peux-tu nous donner le code complet ?

Sinon si Valeurx est du texte le problème vient sûrement de là...
Si c'est le cas, tu peux essayer :

res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "='" &
Valeurx & "'")






Avatar
Sergio
Re

Je l'ai vu aprés et le l'ai essayé aussi mais c'est toujours le même
résultat
"opérateur absent"

Vu mon petit niveau ça me dépasse largement !

A +


"Jessy SEMPERE" a écrit dans le message de news:
brpsfu$sll$
Re,

"Sergio" a écrit dans le message news:

Voila ce que j'ai fait (j'ai aussi essayé avec le "'" final)


attention, il y avait une apostrophe avant aussi...




Avatar
3stone
Salut,


For col = 1 To 3
For valeurx = -1 To 5
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" & valeurx)



Vu que tu boucle sur 3 colonnes... sont-elles toutes les 3 du même type ?

numérique ou texte ?


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/charte.htm
--------------------------------------

Avatar
Sergio
salut

dans chaque colonne j'ai mis un type différent,
et j'ai éssayé sans boucle, col par col,
ça fait toujours pareil .

les deux types qui m'interressent réelement sont :

le type Oui/non (donc de -1 à 0)

et des champ avec liste déroulante
(je pensais que dans ce cas les valeurs étaient de 1 à x)

d'ailleur j'avais réussi à le faire marcher en remplaçant
les fields(col) par le nom du champ et sans le querydef.
mais dans ce cas, je suis obligé de nommer les champs
un par un et j'en ai une cinquantaine!

donc si je pouvais trouver un fonctionnement avec boucles
ça serait super!

A+ sergio
"3stone" a écrit dans le message de news:

Salut,


For col = 1 To 3
For valeurx = -1 To 5
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "="
& valeurx)




Vu que tu boucle sur 3 colonnes... sont-elles toutes les 3 du même type ?

numérique ou texte ?



Avatar
3stone
re,

"Sergio"

donc si je pouvais trouver un fonctionnement avec boucles
ça serait super!



Je me suis fait tout le fil... ;-)

(
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" & valeurx)
)

N'aurais tu pas un nom de champ avec espace ?
si oui... essaies :

res = DCount(qd.Fields(col).Name, qd.Name,"[" & qd.Fields(col).Name & "]=" & valeurx)


hummm ?


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/charte.htm
--------------------------------------

Avatar
Damien Mermoz
Salut,

justement c'est ca que je pige pas parce que si ca marchait avec le nom du
champ ca devrait aussi marcher avec le querydef, j'avais testé.

Ca m'intrigue quand même beaucoup ton pb, tu peux pas me mettre juste ta
table et le formulaire/module où il y a ton code dans une nouvelle base. Tu
compresse en zip et tu me l'envoies à


en enlevant le ns_


A +
Damien.

"Sergio" a écrit dans le message news:

salut

dans chaque colonne j'ai mis un type différent,
et j'ai éssayé sans boucle, col par col,
ça fait toujours pareil .

les deux types qui m'interressent réelement sont :

le type Oui/non (donc de -1 à 0)

et des champ avec liste déroulante
(je pensais que dans ce cas les valeurs étaient de 1 à x)

d'ailleur j'avais réussi à le faire marcher en remplaçant
les fields(col) par le nom du champ et sans le querydef.
mais dans ce cas, je suis obligé de nommer les champs
un par un et j'en ai une cinquantaine!

donc si je pouvais trouver un fonctionnement avec boucles
ça serait super!

A+ sergio
"3stone" a écrit dans le message de news:

Salut,


For col = 1 To 3
For valeurx = -1 To 5
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name &
"="



& valeurx)


Vu que tu boucle sur 3 colonnes... sont-elles toutes les 3 du même type
?



numérique ou texte ?







Avatar
Sergio
Ok

j'ai quand même supprimé tous les espaces
maintenent ça fonctionne mais uniquement pour des champs
numériques
mais pas pour des Oui/Non
ni pour les listes.
ça m'etonne que pour les oui/non je n'ai pas de valeur -1 et 0

A+ sergio

"3stone" a écrit dans le message de news:

re,

"Sergio"

donc si je pouvais trouver un fonctionnement avec boucles
ça serait super!



Je me suis fait tout le fil... ;-)

(
res = DCount(qd.Fields(col).Name, qd.Name, qd.Fields(col).Name & "=" &
valeurx)

)

N'aurais tu pas un nom de champ avec espace ?
si oui... essaies :

res = DCount(qd.Fields(col).Name, qd.Name,"[" & qd.Fields(col).Name & "]="
& valeurx)



hummm ?


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/charte.htm
--------------------------------------







1 2