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

VBA Access Discussion :

Derniere zone de texte avant clic sur bouton [AC-2016]


Sujet :

VBA Access

  1. #1
    Futur Membre du Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Juillet 2018
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Juillet 2018
    Messages : 9
    Points : 7
    Points
    7
    Par défaut Derniere zone de texte avant clic sur bouton
    Bonjour,

    J'ai un nouveau problème que je n'arrive pas à résoudre...

    Pour simplifier mon problème:
    - Imaginons que j'ai plusieurs zones de texte dans mon formulaire, l'utilisateur peut les remplir à sa guise.
    - Lors d'un clic sur un bouton j'aimerais pouvoir récupérer le nom du contrôle précédent (qui est en fait celui où le curseur de la souris est présent juste avant le clic bouton).

    Des idées ?
    J'ai pensé à une histoire de focus / activecontrol mais sur chaque événement du bouton (click, gotfocus) le activecontrôl est toujours celui du bouton.

    Merci!
    Antoine

  2. #2
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 331
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 331
    Points : 23 786
    Points
    23 786
    Par défaut
    Bonjour.

    En standard, a mon avis, il n'y a rien.

    Je coderai quelque chose sur l'evenement GotFocus de chacun des champs qui m'interesse avec une variable definie au niveau de module.

    Quelque chose comme :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    dim m_DernierTextBox as TextBox
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Text1_GotFocus()
      set m_DernierTextBox =me.Text1
    End Sub
    et apres tu teste m_DernierTextBox dans le code du bouton.

    A+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  3. #3
    Futur Membre du Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Juillet 2018
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Juillet 2018
    Messages : 9
    Points : 7
    Points
    7
    Par défaut
    Bonjour,

    Effectivement il y a toujours cette solution !

    Merci pour ton expertise

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

Discussions similaires

  1. [WD16] Zone Répété Et clic sur bouton dans rupture
    Par predalpha dans le forum WinDev
    Réponses: 0
    Dernier message: 08/10/2012, 17h34
  2. clic sur bouton = texte
    Par clbibou23 dans le forum Flash
    Réponses: 6
    Dernier message: 28/12/2008, 11h46
  3. Supprimer le texte d'une zone de texte en cliquant sur un bouton ?
    Par beegees dans le forum Général JavaScript
    Réponses: 4
    Dernier message: 05/02/2008, 13h53
  4. Réponses: 13
    Dernier message: 07/08/2006, 10h13
  5. Réponses: 9
    Dernier message: 23/02/2004, 19h14

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