Synchronisation de liste qui ne fonctionne pas

**Gabrieel** · 30/10/2007, 16h39

Bonjour,

je vous explique mon problème.
- j'ai un formulaire sur une table appelons la Recherche
- sur ce formulaire en mode vue normal (pas table), je veux néanmoins qu'il y ait en dessous une liste pour quel si je sélectionne un des élements (dans cette liste) l'enregistrement dans le dormulaire est sélectionné

ci-dessus un print-screen

a ce titre j'ai mis ce code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub lstFormRecherche_AfterUpdate()
  ' filtre sur la liste.
    Dim rs As Object
 
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Chassis] = " & Str(Nz(Me![lstFormRecherche], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

mais ça ne marche pas, le problème c'est que je ne comprends vraiment pas ce que ça veut dire (quel en est l'interprétation). je l'avais pris d'un célèbre forum (d..quelquechose.com) ou on donne parfois les solutions, sans forcement expliquer:-)

ça a marché sur 2 de mes bases, mais là je sais plus!

hey, somebody help!

**Gabrieel** · 30/10/2007, 16h58

si je ne met pas le printscreen...

juste pour info voici le message d'erreur que j'obtiens quand cela arrive:

erreur exécution 13 - incompatibilité de type

ce que je ne comprend pas car les champs sont des champs texte...

**Domi2** · 30/10/2007, 17h06

Bonsoir,

Si c'est de type string, essaie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rs.FindFirst "[Chassis] = '" & Str(Nz(Me![lstFormRecherche], 0)) & "'"

Domi2

**Gabrieel** · 31/10/2007, 07h14

Merci de ta réponse, j'ai remplacer la ligne de code comme indiqué, mais cela ne marche malheureusement pas.

je ne comprend vraiment pas ce qui coince... quelqu'un pourrait il me décripter le bout de code, cela me permettra surement de voir ou ça coince.

merci d'avance