Discussion :

[omen123]

bonjour les amis

en cours de construction de ma base de données je me trouve bloqué sur la reation d'un bouton : tri selection

je voudrai faire la selection dans les colonnes qui se trouve dans le formulaire consultation

merci d 'avance

[marot_r]

Bonjour.

Tu as choisi l'affichage en mode continu et on ne peut pas faire de sélection de colonne dans ce mode.

Tu peux changer l'affichage pour le mode feuille de données en ayant la structure suivante :

Formulaire principal en mode unique.

Données et bouton affiché dans l'entête

Sous-Formulaire en mode feuille de données

Données détails

L'avantage de cet affichage c'est que le tri est automatiquement intégré aux entêtes de colonne sans programmation.

Sinon, il faut que crée des bouton au dessus de tes colonnes et que tu fasses le tri par VBA (ou macro) en gérant l'affichage éventuellement de l'ordre soit dans l'entête de la colonne, soit dans le texte du bouton.

Si il n'est pas désactivé le menu contextuel te permet de définir un tri quel que soit le mode d'affichage.

A+

[omen123]

je pense qu'on s'est ma compris,par exemple sur la colonne :

-date : lorsque je clique sur 14/05/2015 je voudrai qu'il me montre que celui de cette date
-nom : lorsque je clique sur un nom je voudrai qu il m'affiche juste les enregistrement du nom selctionné

bref je voudrai creer un bouton qui lorsque je cliquerai sur un champ il m'affichera que les enregistrement similaire.

[marot_r]

Désolé, tu pensais "trier" au sens d'exclure, j'ai compris au sens de "mettre en ordre".

Sur le forum quand on évoque ce sujet on parle de filtre ou de sélection.

Si ton menu contextuel est actif, tu peux le faire directement avec celui-ci.

Sinon, tu peux créer un bouton dans l'entête et essayer cela :

Code :

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

1
2
3
4
5
 
me.Filter="[NomTonChamp]=" & me.NomTonChamp 'Pour les champs numérique ou booléen
me.Filter="[NomTonChamp]=#" & me.NomTonChamp & "#" ''Pour les champs date
me.Filter="[NomTonChamp]=""" & me.NomTonChamp & """" ''Pour les champs texte
me.FilterOn=true

Je ne l'ai pas testé mais cela doit marcher.

Et il te faut un bouton pour supprimer le filtre.

Code :

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

1
2
3
 
me.Filter=""
me.FilterOn=false

A+

[omen123]

bonjour marrot ,

si j'ai bien compris ce bouton est destiné a une colonne specifique donc si j'ai 11 colonnes ,dois-je creer 11 bouton ?.y 'a t il pas une solution pour qur j'itulise un seul bouton pour tout les les colonnes comme celui qui est dans le menu contextuel (qui est inactif) ??

bien a vous.

merci pour votre aide et pour votre coutien

NB : j'ai esseyé ca

pour faire le filtre
Me.Filter = ""
Me.FilterOn = True
End Sub

pour annuler le filtre

Private Sub Commande35_Click()
Me.Filter = ""
Me.FilterOn = False
End Sub

les deux boutons ne font qu'annuler le filtre .


voila exactement ce que je voudrai faire avec les meme boutons.

[marot_r]

Pour assigner le filtre, il faut définir une valeur.

Code :

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

me.Filter="[NomTonChamp]=" & me.NomTonChamp

Je n'ai jamais essayé de récupérer le champ actif lorsqu'on appuis sur un bouton et je ne suis pas sur que ce soit possible.

Tu peux essayer en mettant dans le code du bouton :

Code :

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

msgbox screen.activecontrol.name.

si tu récupère le nom de ton contrôle alors ajoute

Code :

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

msgbox screen.activecontrol.value

ou

Code :

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

msgbox me.controls(screen.activecontrol.name).value

Attention faire le test sur différentes colonnes pour être sûr que le contrôle récupéré est le bon et pas un hasard.

A+

[omen123]

donc si j'ai bien compris pour chaque colonne je devrai ajouté un bouton ????

est ce que c 'est possible d'ajoute le bouton filtre selection comme indiqué sur la foto dessous svp (ca sera plus facile) :

[marot_r]

donc si j'ai bien compris pour chaque colonne je devrai ajouté un bouton ????

Peut-être pas si tu es capable de récupérer le contrôle actif comme mentionné dans mon post du 23/09/2015, 20h05

Et pour ta seconde question, je ne sais pas. Personnellement j'utilise le menu contextuel de Access qui offre tout cela.

A+

[omen123]

Personnellement j'utilise le menu contextuel de Access qui offre tout cela.

le but c que les itulisateurs ne puisse pas acceder au ruban. en meme temps qu il puissent acceder au bouton que je choisse moi meme

[marot_r]

As-tu essayé le code que je t'ai suggérer ?

Regarde aussi au niveau du ruban, tu peux peut-être intégrer manuellement un bouton système à ton menu personnel.

A+

[omen123]

bonsoir marrot

je suis pas trop fort en code .et pour le ruban j aimerai le desactiver :-(