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 :

regrouper les commandes de navigation (fonctions?) [AC-2003]


Sujet :

IHM

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre Expert
    Avatar de minot83
    Homme Profil pro
    Administrateur de base de données
    Inscrit en
    Mars 2006
    Messages
    972
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Mars 2006
    Messages : 972
    Par défaut regrouper les commandes de navigation (fonctions?)
    Bonsoir,

    Pour la navigation entre forumaires, j’utilise des boutons avec un évènement sur clic tel que :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Private Sub Étiquette36_Click()
        Dim stDocName As String
        stDocName = "Accueil"
        DoCmd.Close
        DoCmd.OpenForm stDocName, acNormal, , , acFormEdit
    End Sub
    Mais je dois répéter n fois ce code dans chaque formulaire...

    Comment faire pour appeler simplement l'action de fermer et d'ouvrir le formulaire? Est-ce une fonction?

    Merci d'avance

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Crée une routine (et non une fonction) ne changera rien.

    Le code que tu as est généré par Access, tu peux faire un raccourci en une seule ligne.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.OpenForm "Accueil", acNormal, , , acFormEdit
    Philippe

  3. #3
    Membre Expert
    Avatar de minot83
    Homme Profil pro
    Administrateur de base de données
    Inscrit en
    Mars 2006
    Messages
    972
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Mars 2006
    Messages : 972
    Par défaut
    Citation Envoyé par Philippe JOCHMANS Voir le message
    Bonjour
    Crée une routine (et non une fonction) ne changera rien.
    Le code que tu as est généré par Access, tu peux faire un raccourci en une seule ligne.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.OpenForm "Accueil", acNormal, , , acFormEdit
    Philippe
    Salut Philippe et merci,

    ce n'est pas possible d'enregistrer quelque part l'action de fermer le formulaire chargé, et d'ouvrir le formulaire Accueil ? (sans macro si possible)

  4. #4
    Membre Expert
    Avatar de FreeAccess
    Homme Profil pro
    Un monde ou prendre est plus facile qu'apprendre.
    Inscrit en
    Mars 2006
    Messages
    2 745
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Un monde ou prendre est plus facile qu'apprendre.

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 745
    Par défaut
    Bonjour,

    Tout est possible........encore faut-il que cela te soit vraiment utile..

    Dans un module..
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Function FermerForm()
    '## Fermer le formulaire en cours ##
    Dim frm As Form
    Set frm = Screen.ActiveForm
    DoCmd.Close acForm, frm.name
    DoCmd.OpenForm "Accueil"
    Set frm = Nothing
    End Function
    et sur la propriété "Sur clic" de chaque bouton de tes différents formulaires...
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub cmdFermer_Click()
    FermerForm
    End Sub
    ...à voir

  5. #5
    Membre Expert
    Avatar de minot83
    Homme Profil pro
    Administrateur de base de données
    Inscrit en
    Mars 2006
    Messages
    972
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Mars 2006
    Messages : 972
    Par défaut
    Merci, c'est exactement ce que je cherchais, je trouve ça plus élégant, moins répétitif, après cela fait-il gagner qqchose ?


+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Fonction qui regroupe les commandes sql
    Par champomy62 dans le forum VB.NET
    Réponses: 13
    Dernier message: 28/10/2010, 01h27
  2. [XSLT] Regrouper les noeuds en fonction d'un attribut
    Par Creuvard dans le forum XSL/XSLT/XPATH
    Réponses: 4
    Dernier message: 11/12/2008, 11h31
  3. Regrouper les procédures et fonctions
    Par yuan dans le forum ASP.NET
    Réponses: 3
    Dernier message: 08/08/2007, 15h17
  4. regrouper les fonctions du head
    Par stars333 dans le forum Général JavaScript
    Réponses: 1
    Dernier message: 18/06/2007, 22h29

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