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

Access Discussion :

Récupérer nom utilisateur dans champ ou variable access [AC-2010]


Sujet :

Access

  1. #1
    Candidat au Club
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2013
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2013
    Messages : 4
    Points : 2
    Points
    2
    Par défaut Récupérer nom utilisateur dans champ ou variable access
    Bonjour,
    Je souhaite récupérer le nom de l'utilisateur Windows pour l'afficher et le stocker dans le champ d'une table
    J'ai trouvé la fonction VBA Environ("Username"), mais je n'arrive pas à l'affecter à une variable d'un formulaire access ou à un champ de table
    Merci de votre aide

  2. #2
    Rédacteur/Modérateur
    Avatar de Jeannot45
    Homme Profil pro
    Retraité
    Inscrit en
    Octobre 2004
    Messages
    3 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Enseignement

    Informations forums :
    Inscription : Octobre 2004
    Messages : 3 871
    Points : 8 489
    Points
    8 489
    Par défaut


    Une Piste :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    ' Declaration des variables
    Dim l_strUserName
     
    ' Récupération de l'info
    l_strUserName = Environ(UserName)
    Maintenant si le formulaire contient un champ lié à une table devant stocker le nom de l'utilisateur :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    Me.[Nom du Champ stockant le nom de l'utilisateur] = Environ("Username")
    Bonne continuation

  3. #3
    Candidat au Club
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2013
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2013
    Messages : 4
    Points : 2
    Points
    2
    Par défaut
    J'ai testé la solution 2 qui fonctionne parfaitement, merci !

    Par contre, lorsque j'essaye d'utiliser la variable l_strUserName dans ta 1ère solution pour initialiser un champ (zone texte) de formulaire j'ai une erreur "#Nom ?" dans ce champ.

  4. #4
    Rédacteur/Modérateur
    Avatar de Jeannot45
    Homme Profil pro
    Retraité
    Inscrit en
    Octobre 2004
    Messages
    3 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Enseignement

    Informations forums :
    Inscription : Octobre 2004
    Messages : 3 871
    Points : 8 489
    Points
    8 489
    Par défaut


    Oui, je viens de m'apercevoir que j'avais oublié les ""

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    ' Declaration des variables
    Dim l_strUserName
     
    ' Récupération de l'info
    l_strUserName = Environ("UserName")
    Pense à clôturer ta discussion si pour toi le sujet est solutionné en cliquant sur le bouton placé sous le dernier post de ton fil
    Merci

  5. #5
    Candidat au Club
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2013
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2013
    Messages : 4
    Points : 2
    Points
    2
    Par défaut
    merci pour ton complément.
    j'avais bien ajouté les guillemets manquantes, mais je n'arrive pas à récupérer dans un formulaire access (initialisation d'un camp de saisie par exemple) une variable déclarée dans VBA (dans ton exemple "l_strUserName"); est-ce possible ou je m'y prends mal ?
    merci

  6. #6
    Rédacteur/Modérateur
    Avatar de Jeannot45
    Homme Profil pro
    Retraité
    Inscrit en
    Octobre 2004
    Messages
    3 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Enseignement

    Informations forums :
    Inscription : Octobre 2004
    Messages : 3 871
    Points : 8 489
    Points
    8 489
    Par défaut


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Me.[Nom du contrôle du formulaire devant afficher le nom de l'utilisateur] = Environ("Username")

  7. #7
    Candidat au Club
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2013
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2013
    Messages : 4
    Points : 2
    Points
    2
    Par défaut
    Merci, cela fonctionne; est-ce que l'on peut également utiliser directement pour valoriser les rubriques "Source contrôle" et "Valeur par défaut" de l'onglet "Données" d'un champ d'un formulaire ou seule la solution que tu as donnée (code VBA) fonctionne ?
    merci

  8. #8
    Rédacteur/Modérateur
    Avatar de Jeannot45
    Homme Profil pro
    Retraité
    Inscrit en
    Octobre 2004
    Messages
    3 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 75
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Enseignement

    Informations forums :
    Inscription : Octobre 2004
    Messages : 3 871
    Points : 8 489
    Points
    8 489
    Par défaut


    pour valoriser les rubriques "Source contrôle" et "Valeur par défaut" de l'onglet "Données" d'un champ d'un formulaire ou seule la solution que tu as donnée (code VBA) fonctionne ?
    Je crois qu'il faut passer par le VBA.

    Bonne continuation

    PS : Peux tu clôturer ta discussion en cliquant sur le bouton placé sous le dernier post de ton fil
    Merci

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

Discussions similaires

  1. [SP-2007] liste en cascade et récupérer info utilisateur dans champ
    Par Greed29 dans le forum SharePoint
    Réponses: 13
    Dernier message: 08/12/2011, 16h34
  2. [AC-2000] Récupérer NOM Utilisateur pour l'écrire dans une table
    Par goupil14 dans le forum Sécurité
    Réponses: 3
    Dernier message: 17/01/2010, 20h31
  3. [MySQL] Récupérer valeurs BDD dans champ formulaire
    Par romeskira dans le forum PHP & Base de données
    Réponses: 6
    Dernier message: 12/12/2008, 17h01
  4. Faire du nom d'un champ une variable (automation)
    Par shadockgreg dans le forum VBA Access
    Réponses: 1
    Dernier message: 12/09/2007, 23h41
  5. [VBA-E] récupérer nom utilisateur fichier en lecture seule
    Par cwain dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 23/01/2007, 15h46

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