FormulR ACCESS : à la recherche de l'enregist
Fermé
MITSCH
Messages postés
2
Date d'inscription
dimanche 21 janvier 2007
Statut
Membre
Dernière intervention
22 janvier 2007
-
21 janv. 2007 à 19:23
Jacques - 23 janv. 2007 à 08:35
Jacques - 23 janv. 2007 à 08:35
A voir également:
- FormulR ACCESS : à la recherche de l'enregist
- Access appdata - Guide
- Avis stream access ✓ - Forum Virus
- Bios access - Guide
- You don't have permission to access this resource.server unable to read htaccess file, denying access to be safe ✓ - Forum Debian
- Access recovery - Télécharger - Sauvegarde
1 réponse
Bonjour,
En créant un évènement sur clic basé sur la syntaxe qui suit, il y a de bonnes chances que vous obteniez le résultat escompté ....
Private Sub NOM_A_CHERCHER_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NUM_CLIENT] = " & Str(Me![NOM_A_CHERCHER])
Me.Bookmark = rs.Bookmark
End Sub
Cordialement
La science ne fait que trouver ce qui existe depuis toujours.
Hubert REEVES.
En créant un évènement sur clic basé sur la syntaxe qui suit, il y a de bonnes chances que vous obteniez le résultat escompté ....
Private Sub NOM_A_CHERCHER_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NUM_CLIENT] = " & Str(Me![NOM_A_CHERCHER])
Me.Bookmark = rs.Bookmark
End Sub
Cordialement
La science ne fait que trouver ce qui existe depuis toujours.
Hubert REEVES.
22 janv. 2007 à 20:29
J'ai essayé d'adapter la procédure, en précisant le numéro de l'enregistrement à trouver (que je récupère depuis la liste LST_Particularite), et que je cherche dans l'enregistrement [No_Particularite] de ma table. Cela donne :
Private Sub PARTICULARITE_A_CHERCHER()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[No_Particularite] = " & Str(Me!LST_Particularite.Value)
Me.Bookmark = rs.Bookmark
End Sub
Mais je ne vois pas l'index bouger, et en plus j'ai un message d'erreur relatif aux règles d'intégrité référentielle que j'ai mise en place. Je dois avouer en outre que la journée a été dure, et que j'ai du mal à me concentrer à cette heure tardive.
J'ai imprimé l'aide en ligne sur la fonction Findfirst. Je vais aller manger et je reprendrai plus tard.
Encore un grand merci pour le conseil.
23 janv. 2007 à 08:35
Une correction s'impose. La solution proposée est destinée à estimer la valeur active d'une liste déroulante !
Dans ce contexte : PARTICULARITE_A_CHERCHER() doit être le nom du contrôle qui affiche un enregistrement dans une liste ...
C'est donc l'événément après mise à jour qui convient.
Toutes mes excuses
La science ne fait que trouver ce qui existe depuis toujours.
Hubert REEVES.