Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 25/01/2011, 13h30   #1
Membre régulier
 
Inscription : avril 2005
Messages : 251
Détails du profil
Informations forums :
Inscription : avril 2005
Messages : 251
Points : 86
Points : 86
Par défaut PB filtre sur enregistrement

Bonjour le forum

J' ai un formulaire avec 3 onglets
Le premier Onglet à une zone de liste qui remonte des personnes, un double click
sur une personne affecte un changement d' onglet
qui présente une liste d' enregistrement concernant cet personne dans un sous formulaire.
Sur ce deuxième onglet on a une une zone de liste déroulante qui permet de faire un choix sur les données a afficher.
Tout cela basé sur un clé primaire Matricule
Un bouton de réinitialisation dont le code est le suivant
Code :
1
2
3
  Me.CmbResult = " "
    Me.FilterOn = False
    DoCmd.ShowAllRecords
Mon souci est le suivant
Si je prend la premiere personne dont le matricule est 1, et qu' il a 5 enregsitements le concernant je choisi un item dans la zone
de liste déroulante, et ensuite je fais une réinitialisation, j' obtiens mes 5 enregistrements.
Si je prend le numéro 2, Lors de la réinitialisation, j' obtiens les enregistrement du numéro 1

Merci d' avance pour toute aide
Aladin
Aladin_23 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/01/2011, 18h03   #2
Membre régulier
 
Inscription : avril 2005
Messages : 251
Détails du profil
Informations forums :
Inscription : avril 2005
Messages : 251
Points : 86
Points : 86
Bonsoir le forum
Je continue à essayé de trouve une solution à mon pb et j' ai pensé à stocker r le résultat de la commande du double click dans une variable et de pouvoir récuperer cette valeur lors de la reinitialisation
Voici le code du double clic
Code :
1
2
3
4
5
6
7
 Me!ctrlTab = 1
  Dim rs As Object
    'Dim Matricule As String
    'Matricule = Me.OpenArgs
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Matricule] = " & Str(Nz(Me![lstResult], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
J' ai fait un test avec openargs mais c' est KO
Si quelqu' un a une idée, merci d' avance
Aladin
Aladin_23 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 02h58.


 
 
 
 
Partenaires

Hébergement Web