[ACCESS] Filtrer données liste déroulante par rapport à une autre list

Filtrer données liste déroulante par rapport à une autre list [ACCESS] - Divers - Programmation

Marsh Posté le 29-01-2003 à 11:59:34    

Voici mon probleme : j'ai une liste avec des libellés extraits d'une table.
 
Et une seconde liste dont les données sont fonction de la sélection dans ma premiere liste.
 
Comment faire cela ?? je ne me souvient plus du tout

Reply

Marsh Posté le 29-01-2003 à 11:59:34   

Reply

Marsh Posté le 29-01-2003 à 13:38:15    

ex : 2 listes sur mon formulaire formulaire1
 
* la première : Modifiable0
Contenu : SELECT [commande].[num] FROM commande;  
 
* la deuxième : Modifiable2
Contenu :
SELECT [det_commande].[num], [det_commande].[det] FROM det_commande WHERE num=[forms]!formulaire1!Modifiable0;  
 
Pour le raffraichissement de Modifiable2 en fonction du  
choix Modifiable0, coder dans l'événement Après MAJ :
me.refresh
 
ça résoud ton prob ?  ;)  

Reply

Marsh Posté le 29-01-2003 à 15:05:21    

ouais c'est impec !!
 
merci à toi

Reply

Marsh Posté le 23-07-2008 à 17:10:20    

Bonjour j'ai un problème semblable j'ai une liste qui reçois des données d'une table d'expert puis j'ai une liste de métier qui reçois aussi ses données d'une table qui est lié à la table d'expert donc qui reçois la clé du type d'expert pour faire le lien entre les deux tables. bien entendu dans une ne table de personne j'ai un champs qui correspond au type d'expert qui vient de ma table d'expert  et un champs de métier qui vient de ma table métier. donc ce que je veux c'est pouvoir dans mon formulaire choisir pour ma personne avec ma liste déroulante un type d'expert et choisir un métier dans une autre  liste déroulante qui varie selon le type d'expert  merci de me repondre

Reply

Marsh Posté le 06-08-2008 à 16:27:35    

bonjour,
 
j'ai trouver une solution a mon problème que voici
 
Private Sub PeExpert_AfterUpdate()
    ' vérifie si le type d'expert corespond a ouvrier spécialiser (id=4)  ou fournisseur (id=5) de matériaux pour permette l'affichage du champ metier si ce la est vrai sinon il le masque
    If (PeExpert.Value = 4) Or (PeExpert.Value = 5) Then
        peMetier.Visible = True
    Else
        peMetier.Visible = False
        peMetier.Value = ""
        peSpecialisation.Visible = False
        peSpecialisation.Value = ""
    End If
     
    DoCmd.RunCommand acCmdSaveRecord 'enregistre le record
    'permet d'afficher la liste des métier selon le type d'expert choisi
    peMetier.RowSource = "Select MeId, MeDesc, ExId from Metier where ExId = " & PeExpert.Value & ";"
    'applique la requete
    peMetier.Requery
     
     
 
End Sub
 
Private Sub peMetier_AfterUpdate()
    If (peMetier.Value <> 7) Then 'vérifie si le métier est différent de entrepreneur généraux (id = 7)car celui ci n'a pas de spécialisation donc il ne permet pas l'affichage du champ spécialisation
        peSpecialisation.Visible = True
    Else
        peSpecialisation.Visible = False
        peSpecialisation.Value = ""
    End If
     
    DoCmd.RunCommand acCmdSaveRecord ' enregistre le record
    'permet d'afficher seulement la liste des spécialisation du métier choisis
    peSpecialisation.RowSource = "Select [SpId], [SpDesc], [MeId] from Specialisation where MeId = " & peMetier.Value
    'applique la requete
    peSpecialisation.Requery
 
End Sub
 
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed