Sélectionner automatiquement le contenu d’une zone de texte (TextBox)

Comment faire en sorte que le contenu d’une zone de texte soit automatiquement sélectionné lorsqu’on clique dans cette zone ?

Le problème

Sur un formulaire, lorsque vous déplacez via la touche Tabulation, le texte de chaque TextBox est automatiquement sélectionné (il passe en fond noir). Par contre, ce n’est pas le cas lorsque vous cliquez à la souris dans une zone de texte. Et pourtant ce serait parfois pratique !

Affichage en cascade des instances de formulaire

La solution

Recopiez ce tout petit bout de code dans un module standard de votre base de données :

Ensuite, pour chaque zone de texte concernée :

  1. Faites apparaître les propriétés de la zone de texte, onglet Événement.
  2. Cliquez sur les points de suspension à droite de l’événement Sur clic.
  3. Choisissez Générateur de code.
  4. Faites en sorte que l’événement ressemble à ça :

Bien sûr, vous changez le nom de la TextBox en fonction de votre formulaire. 😉 Et vous reproduisez la méthode pour chaque TextBox

Vous aimerez aussi...

6 réponses

  1. Félix dit :

    Bonjour,

    J’aimerais faire la même chose mais pour un objet excel dans lequel du texte est écrit.

    Merci.

  2. Hervé Inisan dit :

    Nanille > Pas directement. Mais comme je l’ai dit plus haut, pour vider une liste, il faut lui donner sa valeur par défaut (c’est en principe fait automatiquement quand on se positionne sur un nouvel enregistrement). A moins que tes listes soient des listes indépendantes (mention « Indépendant » s’affichant en mode Création) ?

  3. Nanille dit :

    Salut Hervé,
    Si j’ai bien compris, pas moyen de sélectionner mon texte au clic dans une listBox à cause de la réinitialisation ?
    Tant pis on effacera ce qu’il y a dans le cadre « à la main ».
    Merci quand même beaucoup pour ton aide.

  4. Hervé Inisan dit :

    Nanille > Effectivement, ça ne marchera pas sur une ListBox. Pour réinitialiser une liste déroulante, il faut lui donner sa valeur initiale : Me.NomDeLaListe = xyz (où xyz est la valeur par défaut de la liste).

  5. Nanille dit :

    Salut,
    Cela fonctionne parfaitement pour une zone de texte mais cela ne fonctionne pas pour mes listes déroulantes, j’ai bien essayé de changer le « TextBox », mais je n’ai pas trouvé par quoi le remplacer pour que cela puisse fonctionner sur mes listes déroulantes.

    Merci encore

Laisser un commentaire

Votre adresse de messagerie ne sera pas publiée. Les champs obligatoires sont indiqués avec *