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 :

Valeur par défaut à partir d'une variable public


Sujet :

IHM

  1. #1
    Membre éclairé Avatar de Oliv'83
    Homme Profil pro
    Directeur commercial
    Inscrit en
    Mars 2008
    Messages
    421
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 56
    Localisation : France

    Informations professionnelles :
    Activité : Directeur commercial
    Secteur : Tourisme - Loisirs

    Informations forums :
    Inscription : Mars 2008
    Messages : 421
    Par défaut Valeur par défaut à partir d'une variable public
    Bonjour à tous,

    Je suis confronté au problème suivant, je souhaite remplir la valeur par défaut d'un champ d'un de mes formulaires par une variable public qui a été définie par un autre formulaire qui est ensuite fermé.

    Impossible de trouver la bonne formulation à mettre dans la case valeur par défaut de mon champ.

    Je précise que ma variable a pour nom strNomInscription, que je travaille sous access 2007 et que je ne suis pas un expert...

    D'avance merci

    Oliv'

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 684
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 684
    Par défaut
    Bonjour Oliv,
    bienvenue sur DVP
    dans ces cas là j'utilise des fonctions publiques dédiées à la lecture de la valeur :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Public Function LitNomInscription() As String
    LitNomInscription = strNomInscription
    End Function
    et tu mets = LitstrNomInscription() dans la txtbox par exemple
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel (3e édition)
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Expert confirmé
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Par défaut
    Hello,

    pour info une autre piste, les propriétés d'une base de données (cf. FAQ)

  4. #4
    Expert confirmé

    Profil pro
    Inscrit en
    Mai 2005
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 3 419
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
     
    Function litprop(x As String) As Date
    Dim u As Database
    Set u = CurrentDb
    litprop = u.Containers!Databases.Documents("userdefined").Properties(x).value
    End Function
     
     
    Function ecritprop(x As String, y As Variant) As Boolean
    Dim u As Database
    Set u = CurrentDb()
    u.Containers!Databases.Documents("userdefined").Properties(x).value = y
    End Function

  5. #5
    Membre éclairé Avatar de Oliv'83
    Homme Profil pro
    Directeur commercial
    Inscrit en
    Mars 2008
    Messages
    421
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 56
    Localisation : France

    Informations professionnelles :
    Activité : Directeur commercial
    Secteur : Tourisme - Loisirs

    Informations forums :
    Inscription : Mars 2008
    Messages : 421
    Par défaut
    WHAOU quelle rapidité.

    Merci à tous les trois.

    jpcheck j'ai utilisé ta solution qui fonctionne très bien mais tu as du faire une petite faute de frappe, il doit falloir mettre = LitNomInscription() et pas = LitstrNomInscription() dans la txtbox.

    cafeine je vais de ce pas lire ce chapitre des FAQ

    random désolé mais mon niveau Access est insuffisant pour savoir quoi faire de ton code. Mais je vais essayer de progresser pour le comprendre. Je suis un autodidacte qui aimerait bien avoir plus de temps pour approfondir ses connaissances sur ce programme.

    Encore une fois merci à tous.

    bonne journée à tous

    Oliv'

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

Discussions similaires

  1. Réponses: 14
    Dernier message: 09/07/2008, 19h58
  2. Réponses: 1
    Dernier message: 12/05/2008, 19h39
  3. Réponses: 2
    Dernier message: 22/02/2008, 11h54
  4. Valeur par défaut à prendre dans une autre table
    Par louroulou dans le forum Access
    Réponses: 6
    Dernier message: 19/07/2006, 11h38
  5. Valeur par défaut lié a une table
    Par Alpha31 dans le forum Access
    Réponses: 2
    Dernier message: 18/05/2006, 21h27

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