Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > IHM
IHM Ce forum est dédié aux questions relatives à la création de formulaires et d'états, avec ou sans code VBA, et macros.
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 13/05/2011, 00h26   #1
Invité régulier
 
Homme
Inscription : mai 2011
Messages : 28
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations forums :
Inscription : mai 2011
Messages : 28
Points : 9
Points : 9
Par défaut Conditionner les données d'une liste en en choisissant un champs grâce à une liste

Bonjour à tous.

L'intitulé est un peut sombre mais je m'explique:

J'ai une table avec 10 champs. Je voudrais pouvoir chercher dans cette table un enregistrement selon les données de quatre champs. Mais je voudrais pouvoir choisir les champs.

Donc sa serait une première liste avec les champs de ma table et une seconde avec les données de ce champs.

Merci d'avance
Oxopor est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/05/2011, 13h27   #2
Rédacteur/Modérateur

 
Avatar de loufab
 
Homme Fabrice CONSTANS
Ingénieur développement logiciels
Inscription : avril 2005
Messages : 7 085
Détails du profil
Informations personnelles :
Nom : Homme Fabrice CONSTANS
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : avril 2005
Messages : 7 085
Points : 11 623
Points : 11 623
Bonjour,
Pour la première liste aucune difficulté c'est dans les propriétés de la liste.

Pour la seconde tu dois créer un requete source dynamique. Comme ceci.

Sur Après MAJ de la liste 1:

Code :
1
2
3
dim strQuery as string
strQuery = "SELECT " & me.liste1 & " FROM matable;"
me.liste2.recordsource = strquery
Tu dois faire les bons réglages de chaque liste.

Cordialement,
__________________
Classe MELA(CRUD) Opérateur IN et zone de liste
MsGraph et VBA - 1e Partie 2e partie
Entête d'états-Opérateur LIKE-Evénements formulaires-Cours 2010
Complément :Générateur de msgbox
Visitez mon Blog
Les questions techniques par MP ne sont pas lues et je ne pratique pas l'extispicine
loufab est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/05/2011, 01h08   #3
Invité régulier
 
Homme
Inscription : mai 2011
Messages : 28
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations forums :
Inscription : mai 2011
Messages : 28
Points : 9
Points : 9
Par défaut Résolu

Merci pour ta réponse Loufab.

Après quelques réglages, sa donne cela :

Code :
1
2
3
4
5
6
7
8
Private Sub Liste1_AfterUpdate()
Dim strQuery As String
 
strQuery = "SELECT [Table1].[N°], [Table1].[" & Me.Liste1.Text & "] FROM [Table1]"
 
Me.Liste2.RowSource = strQuery
 
End Sub
Avec au préalable, le renseignement de la Liste1 (création d'une nouvelle table avec comme données, tous les champs de la Table1).

Encore un grand merci,

Cordialement
Oxopor est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 11h46.


 
 
 
 
Partenaires

Hébergement Web