critère de requête sur une partie de saisie, par liste déroulante

Vous pouvez partir de cet exemple:
Option Compare Database
Option Explicit

Private Sub cmbCode_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT * FROM MaTable WHERE MnChamp Like " & Chr(34) &
Me!cmbCode & Chr(34) & ";"
'[...]
End Sub

Private Sub cmbCode_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Const SEPARATOR = " "
Dim astrCriteria() As String
Dim strCriteria As String
Dim I As Integer

astrCriteria = Split(Me!Code, SEPARATOR)
For I = LBound(astrCriteria) To UBound(astrCriteria)
strCriteria = strCriteria & astrCriteria(I) & IIf(I =
UBound(astrCriteria), "", ";")
Next
cmbCode.RowSourceType = "Liste valeurs"
cmbCode.RowSource = strCriteria
End Sub

Argy

Bonjour,

j'ai une table qui comporte un champ "code"
ce champ peut contenir des codes de ce format :
ex :"ca de ce ag"
J'aimerai, avec un formulaire de choix sur liste deroulante pouvoir lancer
une requête de sélection
sur une partie de ce code ex: "de"
équivalent de :"comme "*de*", en mode critère direct
Je sais faire avec formulaire de choix sur une liste deroulante pour un
contenu entier de champ de requête,

sur critère :[formulaires]![choix]![monchoix]

mais pas sur une partie de saisie.
Merci de l'aide.

Sylvere

Bonsoir,

Je ne suis pas sûre d'avoir bien compris la question...
As-tu essayé
sur critère : comme "*" & [formulaires]![choix]![monchoix] & "*"

Françoise
ENITA Bordeaux - DETSI - UF Informatique
www.enitab.fr


"sylvere" <adsea77.logis.aaae@wanadoo.fr> a écrit dans le message de news:
436b2892$0$27403$8fcfb975@news.wanadoo.fr...

Bonjour,

j'ai une table qui comporte un champ "code"
ce champ peut contenir des codes de ce format :
ex :"ca de ce ag"
J'aimerai, avec un formulaire de choix sur liste deroulante pouvoir lancer
une requête de sélection
sur une partie de ce code ex: "de"
équivalent de :"comme "*de*", en mode critère direct
Je sais faire avec formulaire de choix sur une liste deroulante pour un
contenu entier de champ de requête,

sur critère :[formulaires]![choix]![monchoix]

mais pas sur une partie de saisie.
Merci de l'aide.

Sylvere

Erratum:
J'ai oublié les étoiles...

Private Sub cmbCode_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT * FROM MaTable WHERE MnChamp Like "& Chr(34) & "*" &
Me!cmbCode & "*" & Chr(34) & ";"
'[...]
End Sub

Vous pouvez partir de cet exemple:
Option Compare Database
Option Explicit

Private Sub cmbCode_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT * FROM MaTable WHERE MnChamp Like " & Chr(34) &
Me!cmbCode & Chr(34) & ";"
'[...]
End Sub

Private Sub cmbCode_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
Const SEPARATOR = " "
Dim astrCriteria() As String
Dim strCriteria As String
Dim I As Integer

astrCriteria = Split(Me!Code, SEPARATOR)
For I = LBound(astrCriteria) To UBound(astrCriteria)
strCriteria = strCriteria & astrCriteria(I) & IIf(I =
UBound(astrCriteria), "", ";")
Next
cmbCode.RowSourceType = "Liste valeurs"
cmbCode.RowSource = strCriteria
End Sub

Argy

Bonjour,

j'ai une table qui comporte un champ "code"
ce champ peut contenir des codes de ce format :
ex :"ca de ce ag"
J'aimerai, avec un formulaire de choix sur liste deroulante pouvoir lancer
une requête de sélection
sur une partie de ce code ex: "de"
équivalent de :"comme "*de*", en mode critère direct
Je sais faire avec formulaire de choix sur une liste deroulante pour un
contenu entier de champ de requête,

sur critère :[formulaires]![choix]![monchoix]

mais pas sur une partie de saisie.
Merci de l'aide.

Sylvere

Merci Francoise,
Cette formule marche à merveille

Merci a tous


"Fr@ncoise" <soizic33_nospamm@lm6net.fr> a écrit dans le message de
news:%235VbRUV4FHA.2552@TK2MSFTNGP10.phx.gbl...

Bonsoir,

Je ne suis pas sûre d'avoir bien compris la question...
As-tu essayé
sur critère : comme "*" & [formulaires]![choix]![monchoix] & "*"

Françoise
ENITA Bordeaux - DETSI - UF Informatique
www.enitab.fr


"sylvere" <adsea77.logis.aaae@wanadoo.fr> a écrit dans le message de news:
436b2892$0$27403$8fcfb975@news.wanadoo.fr...

Bonjour,

j'ai une table qui comporte un champ "code"
ce champ peut contenir des codes de ce format :
ex :"ca de ce ag"
J'aimerai, avec un formulaire de choix sur liste deroulante pouvoir
lancer

une requête de sélection
sur une partie de ce code ex: "de"
équivalent de :"comme "*de*", en mode critère direct
Je sais faire avec formulaire de choix sur une liste deroulante pour un
contenu entier de champ de requête,

sur critère :[formulaires]![choix]![monchoix]

mais pas sur une partie de saisie.
Merci de l'aide.

Sylvere

ah mais revoilà la jolie Françoise, comment va ??
inutile de nous reourner la question, 3stone et raymond vieillissent trés mal, moi çà va :o))

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/

"Fr@ncoise" <soizic33_nospamm@lm6net.fr> a écrit dans le message de news: %235VbRUV4FHA.2552@TK2MSFTNGP10.phx.gbl...

Bonsoir,

Je ne suis pas sûre d'avoir bien compris la question...
As-tu essayé
sur critère : comme "*" & [formulaires]![choix]![monchoix] & "*"

Françoise
ENITA Bordeaux - DETSI - UF Informatique
www.enitab.fr


"sylvere" <adsea77.logis.aaae@wanadoo.fr> a écrit dans le message de news: 436b2892$0$27403$8fcfb975@news.wanadoo.fr...

Bonjour,

j'ai une table qui comporte un champ "code"
ce champ peut contenir des codes de ce format :
ex :"ca de ce ag"
J'aimerai, avec un formulaire de choix sur liste deroulante pouvoir lancer
une requête de sélection
sur une partie de ce code ex: "de"
équivalent de :"comme "*de*", en mode critère direct
Je sais faire avec formulaire de choix sur une liste deroulante pour un
contenu entier de champ de requête,

sur critère :[formulaires]![choix]![monchoix]

mais pas sur une partie de saisie.
Merci de l'aide.

Sylvere