IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

IHM Discussion :

Filtrage alphabétique à l'aide d'onglets


Sujet :

IHM

  1. #1
    Nouveau Candidat au Club
    Homme Profil pro
    rien
    Inscrit en
    Septembre 2015
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : rien
    Secteur : Boutique - Magasin

    Informations forums :
    Inscription : Septembre 2015
    Messages : 1
    Points : 1
    Points
    1
    Par défaut Filtrage alphabétique à l'aide d'onglets
    Salut à tous,

    je voudrais filtrer mes enregistrements en fonction de la 1ère lettre du nom de contact à l'aide d'un contrôle Onglet dans Access 2013. C'est-à-dire un formulaire contenant un contrôle onglet comprenant 27 onglets : un pour chaque lettre de l'alphabet et un dernier qui affiche toute la liste de contacts. Je savais le faire dans une version antérieure d'Access de façon très simple mais dans cette version je n'arrive pas à appliquer de filtre lors d'un clic sur un des onglets.

    Je ne me rappelle plus de la procédure ni de la syntaxe.

    Si qq'un peut m'aider.....

    Merci d'avance,
    @+

  2. #2
    Membre éprouvé
    Inscrit en
    Août 2008
    Messages
    740
    Détails du profil
    Informations forums :
    Inscription : Août 2008
    Messages : 740
    Points : 1 045
    Points
    1 045
    Par défaut
    le tab control [Tabctrl] avec ses 27 onglets doit piloter une subform filtrable

    sur l'evenement on click de [Tabctrl] on met a jour le filtre de la subform en s'appuyant sur un de ses champs texte [Champtext], on recupere l'index du tabctrl (qui commence a zero) et on rajoute 64 pour se retrouver dans l'alphabet


    if Me.TabCtrl=0 then
    Me.[MySubForm].Form.Filter = ""
    Else
    Me.[MySubForm].Form.Filter = "Champtexte ALike """ & Chr(Me.TabCtrl + 64) & "%"""
    End If

Discussions similaires

  1. aide sur Onglets
    Par ihebweb dans le forum Android
    Réponses: 3
    Dernier message: 01/04/2011, 10h44
  2. [XL-2000] Aide activation onglet
    Par Corentin02 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 29/09/2010, 12h12
  3. Demande d'aide d'onglet
    Par skud07 dans le forum SharePoint
    Réponses: 2
    Dernier message: 02/01/2009, 13h54
  4. Filtrage à critère multiple (aide sur la syntaxe)
    Par Amiral19 dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 25/06/2007, 11h13
  5. Aide pour onglet
    Par Aeae76 dans le forum Général JavaScript
    Réponses: 2
    Dernier message: 26/02/2007, 14h34

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo