Trouver le 1er dans la liste déroulante
Bonjour,
J'ai un formulaire contenant les enregistrements : AAA, AAAA, BBB, CCC ...etc...
Je saisi "CC" sur le champ "Rechercher" et j'utilise ce code pour positionner sur le 1er de la liste qui contient "CC".
Le code marche.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| Dim rst As DAO.Recordset
Dim strCriteria As String
strCriteria = "[" & CodeArticle.Name & "] Like '*" & Me.Rechercher & "*'"
Set rst = Me.RecordsetClone
rst.FindFirst strCriteria
If rst.NoMatch Then
Else
Me.Bookmark = rst.Bookmark
End If
Set rst = Nothing |
Par contre, lorsque ma liste AAA, AAAA, BBB, CCC ...etc... se trouve sur une liste déroulante, là je ne sais plus faire.
Merci de votre aide.