Controle pour critere

Merci beaucoup crinblanc, ça marche "nickel chrome" !

Pour la proposition de Jessy, je n'ai pas encore essayé mais je le ferai dès
que j'aurai un peu de temps et vous tiendrai au courant.
Merci à toi également Jessy.

Essaie çà

criteres = "'" & Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", "'
OR
ORGANISME.[N° de département] = '") & "'"


"Bubu" wrote:

C'est presque parfait. Ca semble vouloir marcher (ça fixe bien comme critère
de ma requete les valeurs entrées dans mon controle de formulaire mais y a
encore un petit bemol : mon champ [N° de departement] est un champ texte.
J'ai donc un message d'erreur lorsque je saisis mes numéros de département
sans guillement. Suis-je condamné à saisir avec des guillemets dans mon
formulaire ou y a-t-il moyen que le module ajoute lui-meme les guillemets ?

Pour info, il a fallu que je modifie un peu la ligne suivante :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ," OR
Forms![ETIQUETTES ORGANISME]![Département] = ")
modifiée en :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", " OR
ORGANISME.[N° de département] = ")

Une fois de plus je te remercie pour ton aide EXTREMEMENT PRECIEUSE !

Regarde dans le module si dans "références" tu as bien DAO3.6 ou DAO...


"Bubu" wrote:

Effectivement, je comprends mieux pourquoi je n'y arrivais pas, ça dépasse
largement mes faibles compétences. J'ai essayé ton code associé à un bouton
recherche mais j'obtiens le message d'erreur suivant : Erreur de compilation
: Type défini par l'utilisateur non défini. Ce qui semble poser problème,
c'est l''expression suivante : qdf As QueryDef. Lorsque je regarde l'aide
associée à ce message d'erreur, j'avoue que je ne comprends pas grand chose,
compte tenu de mes faibles compétences en développement-programmation.
Connais-tu la marche à suivre pour débloquer tout ça ?
Encore merci crinblanc.

Crée un bouton "Recherche" pour ouvrir ta requête et mets ce code sur le
"Click"

Dim qdf As QueryDef, criteres as String

criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ," OR
Forms![ETIQUETTES ORGANISME]![Département] = ")

Set qdf = CurrentDb.QueryDefs("Nom-de-ta-requête")
qdf.SQL="SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1],
ORGANISME.Commune,
ORGANISME.[N° de département] FROM ORGANISME WHERE ORGANISME.[N° de
département] = " & criteres

SEPARE LES N° PAR UN ESPACE!!

"Bubu" wrote:

Voici le SQL de ma requete :

SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1], ORGANISME.Commune,
ORGANISME.[N° de département]
FROM ORGANISME
WHERE (((ORGANISME.[N° de département])=[Formulaires]![ETIQUETTES
ORGANISME]![Département]));

Ce que je voudrais c'est pouvoir saisir plusieurs N° de département dans le
contrôle [Département] de mon formulaire, afin que la requete m'affiche les
organismes de plusieurs départements. Désolé si je ne suis pas très clair et
merci.

Donne-moi le SQL de ta requête.

Oui la requete existe, elle contient le champ departement et dans cette
requete, dans la zone critere j'ai mis la référence du controle de mon
formulaire. Est-ce plus claire comme ça ? Merci de ton aide.

Pas bien clair ton affaire!
La requête existe?
Si oui, un critère fait référence à ton contrôle de formualire?

Bonjour a tous,
Je souhaite utiliser un controle de formulaire pour specifier un critere
dans une requete. Jusque la rien de complique mais ma difficulte c'est que je
souhaiterais que ce seul controle me permette de specifier un ou plusieurs
criteres pour un meme champ. Par exemple, lorsque je souhaite que ma requete
affiche les clients du departement 86, il me suffit de taper 86 dans le
controle utilise comme critere du champ departement et cela marche tres bien.
Par contre si je veux que ma requete affiche les clients des departements 86
ou 79, j'ai beau saisir 86 Ou 79 dans mon controle, cela ne marche pas. J'ai
essaye plusieurs syntaxes dans mon controle avec Comme, Dans... mais ça ne
marche pas.
Pouvez-vous m'aider ? Par avance merci.

Merci de ton aide Jessy. J'ai essayé ton code mais je ne dois pas l'avoir
utilisé correctement (Je ne maitrise ni le visual basic ni le sql) car ça ne
donne pas le résultat escompté. Celui de crinblanc marche très bien donc je
pense que je vais en rester là.
Enore merci
Bubu

Bonjour

Perso je ferais comme ça pour définir ta variable "Critere" :

Dim strX As String
Dim tabX
Dim intTab As Integer
Dim strFld As String
Dim strCritere As String

strFld = "ORGANISME.[N° de département]="
strX = "Forms![ETIQUETTES ORGANISME]![Département]"
tabX = Split(strX, " ")
For intTab = 0 To UBound(tabX)
If strCritere = "" Then
strCritere = strFld & "'" & tabX(intTab) & "'"
Else
strCritere = strCritere & " OR " & strFld & "'" & tabX(intTab) & "'"
End If
Next

@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Bubu" <Bubu@discussions.microsoft.com> a écrit dans le message news:
9A771C54-E753-483D-ACEF-51293EB5BF11@microsoft.com...

C'est presque parfait. Ca semble vouloir marcher (ça fixe bien comme
critère

de ma requete les valeurs entrées dans mon controle de formulaire mais y a
encore un petit bemol : mon champ [N° de departement] est un champ texte.
J'ai donc un message d'erreur lorsque je saisis mes numéros de département
sans guillement. Suis-je condamné à saisir avec des guillemets dans mon
formulaire ou y a-t-il moyen que le module ajoute lui-meme les guillemets
?

Pour info, il a fallu que je modifie un peu la ligne suivante :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ," OR
Forms![ETIQUETTES ORGANISME]![Département] = ")
modifiée en :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", " OR
ORGANISME.[N° de département] = ")

Une fois de plus je te remercie pour ton aide EXTREMEMENT PRECIEUSE !

Regarde dans le module si dans "références" tu as bien DAO3.6 ou DAO...


"Bubu" wrote:

Effectivement, je comprends mieux pourquoi je n'y arrivais pas, ça
dépasse

largement mes faibles compétences. J'ai essayé ton code associé à un
bouton

recherche mais j'obtiens le message d'erreur suivant : Erreur de
compilation

: Type défini par l'utilisateur non défini. Ce qui semble poser
problème,

c'est l''expression suivante : qdf As QueryDef. Lorsque je regarde
l'aide

associée à ce message d'erreur, j'avoue que je ne comprends pas grand
chose,

compte tenu de mes faibles compétences en développement-programmation.
Connais-tu la marche à suivre pour débloquer tout ça ?
Encore merci crinblanc.

Crée un bouton "Recherche" pour ouvrir ta requête et mets ce code
sur le

"Click"

Dim qdf As QueryDef, criteres as String

criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " "
," OR

Forms![ETIQUETTES ORGANISME]![Département] = ")

Set qdf = CurrentDb.QueryDefs("Nom-de-ta-requête")
qdf.SQL="SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1],
ORGANISME.Commune,
ORGANISME.[N° de département] FROM ORGANISME WHERE ORGANISME.[N° de
département] = " & criteres

SEPARE LES N° PAR UN ESPACE!!

"Bubu" wrote:

Voici le SQL de ma requete :

SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1],
ORGANISME.Commune,

ORGANISME.[N° de département]
FROM ORGANISME
WHERE (((ORGANISME.[N° de département])=[Formulaires]![ETIQUETTES
ORGANISME]![Département]));

Ce que je voudrais c'est pouvoir saisir plusieurs N° de
département dans le

contrôle [Département] de mon formulaire, afin que la requete
m'affiche les

organismes de plusieurs départements. Désolé si je ne suis pas
très clair et

merci.

Donne-moi le SQL de ta requête.

Oui la requete existe, elle contient le champ departement et
dans cette

requete, dans la zone critere j'ai mis la référence du
controle de mon

formulaire. Est-ce plus claire comme ça ? Merci de ton aide.

Pas bien clair ton affaire!
La requête existe?
Si oui, un critère fait référence à ton contrôle de
formualire?

Bonjour a tous,
Je souhaite utiliser un controle de formulaire pour
specifier un critere

dans une requete. Jusque la rien de complique mais ma
difficulte c'est que je

souhaiterais que ce seul controle me permette de specifier
un ou plusieurs

criteres pour un meme champ. Par exemple, lorsque je
souhaite que ma requete

affiche les clients du departement 86, il me suffit de
taper 86 dans le

controle utilise comme critere du champ departement et
cela marche tres bien.

Par contre si je veux que ma requete affiche les clients
des departements 86

ou 79, j'ai beau saisir 86 Ou 79 dans mon controle, cela
ne marche pas. J'ai

essaye plusieurs syntaxes dans mon controle avec Comme,
Dans... mais ça ne

marche pas.
Pouvez-vous m'aider ? Par avance merci.

Ok pas de soucis

En fait, il fallait aussi remplacer la ligne par :
qdf.SQL="SELECT ORGANISME.[Nom organisme], " _
& "ORGANISME.[Adresse 1], ORGANISME.Commune, " _
& "ORGANISME.[N° de département] " _
& "FROM ORGANISME WHERE " & strCritere

Le strCritere que je faisais te donnait l'intégralité de la clause Where

@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Bubu" <Bubu@discussions.microsoft.com> a écrit dans le message de news:
15F1E321-56E9-4E4F-AE26-7AAE9656589D@microsoft.com...

Merci de ton aide Jessy. J'ai essayé ton code mais je ne dois pas l'avoir
utilisé correctement (Je ne maitrise ni le visual basic ni le sql) car ça
ne

donne pas le résultat escompté. Celui de crinblanc marche très bien donc
je

pense que je vais en rester là.
Enore merci
Bubu

Bonjour

Perso je ferais comme ça pour définir ta variable "Critere" :

Dim strX As String
Dim tabX
Dim intTab As Integer
Dim strFld As String
Dim strCritere As String

strFld = "ORGANISME.[N° de département]="
strX = "Forms![ETIQUETTES ORGANISME]![Département]"
tabX = Split(strX, " ")
For intTab = 0 To UBound(tabX)
If strCritere = "" Then
strCritere = strFld & "'" & tabX(intTab) & "'"
Else
strCritere = strCritere & " OR " & strFld & "'" & tabX(intTab) &
"'"

End If
Next

@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Bubu" <Bubu@discussions.microsoft.com> a écrit dans le message news:
9A771C54-E753-483D-ACEF-51293EB5BF11@microsoft.com...

C'est presque parfait. Ca semble vouloir marcher (ça fixe bien comme
critère

de ma requete les valeurs entrées dans mon controle de formulaire mais
y a

encore un petit bemol : mon champ [N° de departement] est un champ
texte.

J'ai donc un message d'erreur lorsque je saisis mes numéros de
département

sans guillement. Suis-je condamné à saisir avec des guillemets dans
mon

formulaire ou y a-t-il moyen que le module ajoute lui-meme les
guillemets

?

Pour info, il a fallu que je modifie un peu la ligne suivante :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ,"
OR

Forms![ETIQUETTES ORGANISME]![Département] = ")
modifiée en :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", "
OR

ORGANISME.[N° de département] = ")

Une fois de plus je te remercie pour ton aide EXTREMEMENT PRECIEUSE !

Regarde dans le module si dans "références" tu as bien DAO3.6 ou
DAO...

"Bubu" wrote:

Effectivement, je comprends mieux pourquoi je n'y arrivais pas, ça
dépasse

largement mes faibles compétences. J'ai essayé ton code associé à
un

bouton

recherche mais j'obtiens le message d'erreur suivant : Erreur de
compilation

: Type défini par l'utilisateur non défini. Ce qui semble poser
problème,

c'est l''expression suivante : qdf As QueryDef. Lorsque je regarde
l'aide

associée à ce message d'erreur, j'avoue que je ne comprends pas
grand

chose,

compte tenu de mes faibles compétences en
développement-programmation.

Connais-tu la marche à suivre pour débloquer tout ça ?
Encore merci crinblanc.

Crée un bouton "Recherche" pour ouvrir ta requête et mets ce
code

sur le

"Click"

Dim qdf As QueryDef, criteres as String

criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], "
"

," OR

Forms![ETIQUETTES ORGANISME]![Département] = ")

Set qdf = CurrentDb.QueryDefs("Nom-de-ta-requête")
qdf.SQL="SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse
1],

ORGANISME.Commune,
ORGANISME.[N° de département] FROM ORGANISME WHERE ORGANISME.[N°
de

département] = " & criteres

SEPARE LES N° PAR UN ESPACE!!

"Bubu" wrote:

Voici le SQL de ma requete :

SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1],
ORGANISME.Commune,

ORGANISME.[N° de département]
FROM ORGANISME
WHERE (((ORGANISME.[N° de
département])=[Formulaires]![ETIQUETTES

ORGANISME]![Département]));

Ce que je voudrais c'est pouvoir saisir plusieurs N° de
département dans le

contrôle [Département] de mon formulaire, afin que la requete
m'affiche les

organismes de plusieurs départements. Désolé si je ne suis pas
très clair et

merci.

Donne-moi le SQL de ta requête.

Oui la requete existe, elle contient le champ departement
et

dans cette

requete, dans la zone critere j'ai mis la référence du
controle de mon

formulaire. Est-ce plus claire comme ça ? Merci de ton
aide.

Pas bien clair ton affaire!
La requête existe?
Si oui, un critère fait référence à ton contrôle de
formualire?

Bonjour a tous,
Je souhaite utiliser un controle de formulaire pour
specifier un critere

dans une requete. Jusque la rien de complique mais ma
difficulte c'est que je

souhaiterais que ce seul controle me permette de
specifier

un ou plusieurs

criteres pour un meme champ. Par exemple, lorsque je
souhaite que ma requete

affiche les clients du departement 86, il me suffit de
taper 86 dans le

controle utilise comme critere du champ departement et
cela marche tres bien.

Par contre si je veux que ma requete affiche les
clients

des departements 86

ou 79, j'ai beau saisir 86 Ou 79 dans mon controle,
cela

ne marche pas. J'ai

essaye plusieurs syntaxes dans mon controle avec
Comme,

Dans... mais ça ne

marche pas.
Pouvez-vous m'aider ? Par avance merci.

Désolé c'est encore moi : comment faire pour le code fonctionne lorsqu'il n'y
rien de saisi dans le contrôle [Département] de mon formulaire. Cad que les
utilisateurs aient le choix de préciser ou pas le n° de département.
Parcequ'en l'état actuel des choses j'ai un message d'erreur du type
utilisation incorrect de Null lorsque je ne saisie rien dans mon contrôle.
Merci d'avance.

Essaie çà

criteres = "'" & Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", "'
OR
ORGANISME.[N° de département] = '") & "'"


"Bubu" wrote:

C'est presque parfait. Ca semble vouloir marcher (ça fixe bien comme critère
de ma requete les valeurs entrées dans mon controle de formulaire mais y a
encore un petit bemol : mon champ [N° de departement] est un champ texte.
J'ai donc un message d'erreur lorsque je saisis mes numéros de département
sans guillement. Suis-je condamné à saisir avec des guillemets dans mon
formulaire ou y a-t-il moyen que le module ajoute lui-meme les guillemets ?

Pour info, il a fallu que je modifie un peu la ligne suivante :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ," OR
Forms![ETIQUETTES ORGANISME]![Département] = ")
modifiée en :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", " OR
ORGANISME.[N° de département] = ")

Une fois de plus je te remercie pour ton aide EXTREMEMENT PRECIEUSE !

Regarde dans le module si dans "références" tu as bien DAO3.6 ou DAO...


"Bubu" wrote:

Effectivement, je comprends mieux pourquoi je n'y arrivais pas, ça dépasse
largement mes faibles compétences. J'ai essayé ton code associé à un bouton
recherche mais j'obtiens le message d'erreur suivant : Erreur de compilation
: Type défini par l'utilisateur non défini. Ce qui semble poser problème,
c'est l''expression suivante : qdf As QueryDef. Lorsque je regarde l'aide
associée à ce message d'erreur, j'avoue que je ne comprends pas grand chose,
compte tenu de mes faibles compétences en développement-programmation.
Connais-tu la marche à suivre pour débloquer tout ça ?
Encore merci crinblanc.

Crée un bouton "Recherche" pour ouvrir ta requête et mets ce code sur le
"Click"

Dim qdf As QueryDef, criteres as String

criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ," OR
Forms![ETIQUETTES ORGANISME]![Département] = ")

Set qdf = CurrentDb.QueryDefs("Nom-de-ta-requête")
qdf.SQL="SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1],
ORGANISME.Commune,
ORGANISME.[N° de département] FROM ORGANISME WHERE ORGANISME.[N° de
département] = " & criteres

SEPARE LES N° PAR UN ESPACE!!

"Bubu" wrote:

Voici le SQL de ma requete :

SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1], ORGANISME.Commune,
ORGANISME.[N° de département]
FROM ORGANISME
WHERE (((ORGANISME.[N° de département])=[Formulaires]![ETIQUETTES
ORGANISME]![Département]));

Ce que je voudrais c'est pouvoir saisir plusieurs N° de département dans le
contrôle [Département] de mon formulaire, afin que la requete m'affiche les
organismes de plusieurs départements. Désolé si je ne suis pas très clair et
merci.

Donne-moi le SQL de ta requête.

Oui la requete existe, elle contient le champ departement et dans cette
requete, dans la zone critere j'ai mis la référence du controle de mon
formulaire. Est-ce plus claire comme ça ? Merci de ton aide.

Pas bien clair ton affaire!
La requête existe?
Si oui, un critère fait référence à ton contrôle de formualire?

Bonjour a tous,
Je souhaite utiliser un controle de formulaire pour specifier un critere
dans une requete. Jusque la rien de complique mais ma difficulte c'est que je
souhaiterais que ce seul controle me permette de specifier un ou plusieurs
criteres pour un meme champ. Par exemple, lorsque je souhaite que ma requete
affiche les clients du departement 86, il me suffit de taper 86 dans le
controle utilise comme critere du champ departement et cela marche tres bien.
Par contre si je veux que ma requete affiche les clients des departements 86
ou 79, j'ai beau saisir 86 Ou 79 dans mon controle, cela ne marche pas. J'ai
essaye plusieurs syntaxes dans mon controle avec Comme, Dans... mais ça ne
marche pas.
Pouvez-vous m'aider ? Par avance merci.

Bonjour

Essais le code complet suivante :

******************************************************
Dim qdf As DAO.QueryDef
Dim strSQL As String
Dim strX As String
Dim tabX
Dim intTab As Integer
Dim strFld As String
Dim strCritere As String

Set qdf = CurrentDb.QueryDefs("Nom-de-ta-requête")
strSQL = "SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1], " _
& "ORGANISME.Commune, " _
& "ORGANISME.[N° de département] FROM ORGANISME"

strFld = "ORGANISME.[N° de département]="
strX = "Forms![ETIQUETTES ORGANISME]![Département]"

If IsNull(strX) Or strX = "" Then
strSQL = "SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1], " _
& "ORGANISME.Commune, " _
& "ORGANISME.[N° de département] FROM ORGANISME;"
Else
tabX = Split(strX, " ")
For intTab = 0 To UBound(tabX)
If strCritere = "" Then
strCritere = strFld & "'" & tabX(intTab) & "'"
Else
strCritere = strCritere & " OR " & strFld & "'" & tabX(intTab) &
"'"
End If
Next
strSQL = "SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1], " _
& "ORGANISME.Commune, " _
& "ORGANISME.[N° de département] " _
& "FROM ORGANISME WHERE " & strCritere & ";"
End If
qdf.SQL
******************************************************

--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Bubu" <Bubu@discussions.microsoft.com> a écrit dans le message de
news:1F178FCE-BD6B-42D0-8260-D74E0DA31BFA@microsoft.com...

Désolé c'est encore moi : comment faire pour le code fonctionne lorsqu'il
n'y

rien de saisi dans le contrôle [Département] de mon formulaire. Cad que
les

utilisateurs aient le choix de préciser ou pas le n° de département.
Parcequ'en l'état actuel des choses j'ai un message d'erreur du type
utilisation incorrect de Null lorsque je ne saisie rien dans mon contrôle.
Merci d'avance.

Essaie çà

criteres = "'" & Replace(Forms![ETIQUETTES ORGANISME]![Département], "
", "'

OR
ORGANISME.[N° de département] = '") & "'"


"Bubu" wrote:

C'est presque parfait. Ca semble vouloir marcher (ça fixe bien comme
critère

de ma requete les valeurs entrées dans mon controle de formulaire mais
y a

encore un petit bemol : mon champ [N° de departement] est un champ
texte.

J'ai donc un message d'erreur lorsque je saisis mes numéros de
département

sans guillement. Suis-je condamné à saisir avec des guillemets dans
mon

formulaire ou y a-t-il moyen que le module ajoute lui-meme les
guillemets ?

Pour info, il a fallu que je modifie un peu la ligne suivante :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " " ,"
OR

Forms![ETIQUETTES ORGANISME]![Département] = ")
modifiée en :
criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], " ", "
OR

ORGANISME.[N° de département] = ")

Une fois de plus je te remercie pour ton aide EXTREMEMENT PRECIEUSE !

Regarde dans le module si dans "références" tu as bien DAO3.6 ou
DAO...

"Bubu" wrote:

Effectivement, je comprends mieux pourquoi je n'y arrivais pas, ça
dépasse

largement mes faibles compétences. J'ai essayé ton code associé à
un bouton

recherche mais j'obtiens le message d'erreur suivant : Erreur de
compilation

: Type défini par l'utilisateur non défini. Ce qui semble poser
problème,

c'est l''expression suivante : qdf As QueryDef. Lorsque je regarde
l'aide

associée à ce message d'erreur, j'avoue que je ne comprends pas
grand chose,

compte tenu de mes faibles compétences en
développement-programmation.

Connais-tu la marche à suivre pour débloquer tout ça ?
Encore merci crinblanc.

Crée un bouton "Recherche" pour ouvrir ta requête et mets ce
code sur le

"Click"

Dim qdf As QueryDef, criteres as String

criteres = Replace(Forms![ETIQUETTES ORGANISME]![Département], "
" ," OR

Forms![ETIQUETTES ORGANISME]![Département] = ")

Set qdf = CurrentDb.QueryDefs("Nom-de-ta-requête")
qdf.SQL="SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse
1],

ORGANISME.Commune,
ORGANISME.[N° de département] FROM ORGANISME WHERE ORGANISME.[N°
de

département] = " & criteres

SEPARE LES N° PAR UN ESPACE!!

"Bubu" wrote:

Voici le SQL de ma requete :

SELECT ORGANISME.[Nom organisme], ORGANISME.[Adresse 1],
ORGANISME.Commune,

ORGANISME.[N° de département]
FROM ORGANISME
WHERE (((ORGANISME.[N° de
département])=[Formulaires]![ETIQUETTES

ORGANISME]![Département]));

Ce que je voudrais c'est pouvoir saisir plusieurs N° de
département dans le

contrôle [Département] de mon formulaire, afin que la requete
m'affiche les

organismes de plusieurs départements. Désolé si je ne suis pas
très clair et

merci.

Donne-moi le SQL de ta requête.

Oui la requete existe, elle contient le champ departement
et dans cette

requete, dans la zone critere j'ai mis la référence du
controle de mon

formulaire. Est-ce plus claire comme ça ? Merci de ton
aide.

Pas bien clair ton affaire!
La requête existe?
Si oui, un critère fait référence à ton contrôle de
formualire?

Bonjour a tous,
Je souhaite utiliser un controle de formulaire pour
specifier un critere

dans une requete. Jusque la rien de complique mais ma
difficulte c'est que je

souhaiterais que ce seul controle me permette de
specifier un ou plusieurs

criteres pour un meme champ. Par exemple, lorsque je
souhaite que ma requete

affiche les clients du departement 86, il me suffit de
taper 86 dans le

controle utilise comme critere du champ departement et
cela marche tres bien.

Par contre si je veux que ma requete affiche les
clients des departements 86

ou 79, j'ai beau saisir 86 Ou 79 dans mon controle,
cela ne marche pas. J'ai

essaye plusieurs syntaxes dans mon controle avec
Comme, Dans... mais ça ne

marche pas.
Pouvez-vous m'aider ? Par avance merci.