¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
Le contrôle "CtrlObjetCol" du formulaire basé sur la table
"TObjetCol" affiche les noms des couleurs (au lieu du Numéro
auto) parce dans ses Propriétés, il y a ceci:
Contenu: SELECT DISTINCT [TCouleur].[CouleurID], [TCouleur].[Couleur]
FROM TCouleur
Pour faire une rechercher, je dois indiquer un Numéro auto
dans la boîte Rechercher. Comment me déplacer dans les
enregistrements du formulaire en faisant une recherche
sur le nom d'une couleur au lieu de son Numéro auto ?
Tu fais reference à ta 2eme colonne qui contient le nom de la couleur : forms!monform!maliste.Column(1). La colonne 0 etant la 1ere colonne.
Michel Walsh
Salut,
Sans trop comprendre tout le contexte, je pense qu'il faut passer, quelque part, par quelque chose qui ressemble à (dans une procédure After update, pour un combo box, par exemple):
Dim crit As String
crit= "CouleurID" With Me.RecordsetClone .Bookmark = Me.Bookmark ' synchronise la position .FindNext crit ' trouve le prochain
If .NoMatch then .FindFirst crit ' pas de prochain, recherche du début End If
If .NoMatch then MsgBox "Pas trouvé ... " Else Me.Bookmark = .Bookmark ' synchronise la position End If End With
Ainsi, chaque fois que la procédure est exécutée, elle passe au prochain enregistrement satisfaisant le critère, et cycle en fin d'enregistrements pour recommencer au début...
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ Le contrôle "CtrlObjetCol" du formulaire basé sur la table "TObjetCol" affiche les noms des couleurs (au lieu du Numéro auto) parce dans ses Propriétés, il y a ceci:
Contenu: SELECT DISTINCT [TCouleur].[CouleurID], [TCouleur].[Couleur] FROM TCouleur
Pour faire une rechercher, je dois indiquer un Numéro auto dans la boîte Rechercher. Comment me déplacer dans les enregistrements du formulaire en faisant une recherche sur le nom d'une couleur au lieu de son Numéro auto ?
Vercheres QC Canada
Salut,
Sans trop comprendre tout le contexte, je pense qu'il faut passer,
quelque part, par quelque chose qui ressemble à (dans une procédure After
update, pour un combo box, par exemple):
Dim crit As String
crit= "CouleurID"
With Me.RecordsetClone
.Bookmark = Me.Bookmark ' synchronise la position
.FindNext crit ' trouve le prochain
If .NoMatch then
.FindFirst crit ' pas de prochain, recherche du début
End If
If .NoMatch then
MsgBox "Pas trouvé ... "
Else
Me.Bookmark = .Bookmark ' synchronise la position
End If
End With
Ainsi, chaque fois que la procédure est exécutée, elle passe au prochain
enregistrement satisfaisant le critère, et cycle en fin d'enregistrements
pour recommencer au début...
Espérant être utile,
Vanderghast, Access MVP
"Michel Pellegrini" <Michel.Pellegrini@Enter-Net.com> wrote in message
news:%23gJdPMH5DHA.2168@TK2MSFTNGP12.phx.gbl...
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
Le contrôle "CtrlObjetCol" du formulaire basé sur la table
"TObjetCol" affiche les noms des couleurs (au lieu du Numéro
auto) parce dans ses Propriétés, il y a ceci:
Contenu: SELECT DISTINCT [TCouleur].[CouleurID], [TCouleur].[Couleur]
FROM TCouleur
Pour faire une rechercher, je dois indiquer un Numéro auto
dans la boîte Rechercher. Comment me déplacer dans les
enregistrements du formulaire en faisant une recherche
sur le nom d'une couleur au lieu de son Numéro auto ?
Sans trop comprendre tout le contexte, je pense qu'il faut passer, quelque part, par quelque chose qui ressemble à (dans une procédure After update, pour un combo box, par exemple):
Dim crit As String
crit= "CouleurID" With Me.RecordsetClone .Bookmark = Me.Bookmark ' synchronise la position .FindNext crit ' trouve le prochain
If .NoMatch then .FindFirst crit ' pas de prochain, recherche du début End If
If .NoMatch then MsgBox "Pas trouvé ... " Else Me.Bookmark = .Bookmark ' synchronise la position End If End With
Ainsi, chaque fois que la procédure est exécutée, elle passe au prochain enregistrement satisfaisant le critère, et cycle en fin d'enregistrements pour recommencer au début...
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ Le contrôle "CtrlObjetCol" du formulaire basé sur la table "TObjetCol" affiche les noms des couleurs (au lieu du Numéro auto) parce dans ses Propriétés, il y a ceci:
Contenu: SELECT DISTINCT [TCouleur].[CouleurID], [TCouleur].[Couleur] FROM TCouleur
Pour faire une rechercher, je dois indiquer un Numéro auto dans la boîte Rechercher. Comment me déplacer dans les enregistrements du formulaire en faisant une recherche sur le nom d'une couleur au lieu de son Numéro auto ?
