Discussion :

[Manu91]

Bonjour,

Je tiens d'abord à m'excuser pour cette question de néophyte, mais "une question bête est une question non posée....".

J'ai un formulaire "Client" intégrant un contrôle d'onglets, dans lequel il y a un sous-formulaire "Commandes"
Le sous formulaire "Commandes" est traité en Feuille de données, et comporte un nombre de champs très (trop?) élevés, aussi, afin de visualiser un maximum de champs, j'en ai réduit la taille.
Et donc certains champs apparaissent incomplets.
Aussi, j'ai créé une zone texte dans le controle d'onglet, sous le SF "Commandes" qui est sensé reprendre le contenu du champs ayant le focus.

Et c'est la que je calle...

En VBA, le sous formulaire n'accepte que les évènements "enter" et "exit",
Quant au générateur d'expression sur ma zone texte, il reste un grand mystère, surtout lorsque je cherche une expression et que j'essaye de l'utiliser, j'ai bien trouvé "DansSélection", mais n'ai pas été capable de l'utiliser...

Merci pour votre aide !!!!

[ClaudeLELOUP]

Bonjour,

Un proposition dans l'événement "sur réception focus" des contrôles trop petits ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Forms!LeNomDuPrincipal.leContrôleQuiPermetDeVoir = Me.ActiveControl.Value

[Manu91]

Bonsoir Claude, et merci pour ta réponse.

Effectivement, cela fonctionne parfaitement, j'ai mis la ligne dans l'évènement "Gotfocus" d'un champ, et lorsque je click dessus, il écrit sa valeur dans le bon textbox.
Mais si je dois le mettre sur tous les champs... bon, je suis fainéant quoi... et pi, ça fait un code à ralonge...

Comment puis-je capturer l'évènement générique de click sur n'importe quel champ du formulaire ?

[ClaudeLELOUP]

ça fait un code à ralonge...

On parle de quoi ?
10 x 1 lignes ?

Je n'ai rien d'autre en magasin.
Bonne soirée.

[Manu91]

On parle de quoi ?
10 x 1 lignes ?.

Un peu plus, et c'est plutot 20*3lignes, du style :

Private Sub N°_COMMANDE_GotFocus()
Forms![Clients].TBFocus = Me.ActiveControl.Value
End Sub

Je n'ai rien d'autre en magasin.
Bonne soirée.

Je pensais en fait à utiliser un "addhandler" pour récupérer les actions sur les champs, et les traiter en bloc, mais cette fonction n'existe pas en VBA...
Je te remercie tout de même d'avoir ouvert "ton magasin" pour moi...

Manuel

[ClaudeLELOUP]

Bonjour,

Tant qu'à faire, tu pourrais peut-être penser à une autre solution : un formulaire "annexe"
- ce formulaire serait ouvert systématiquement à l'ouverture du 1er
- il afficherait en format lisible tous les champs de l'enregistrement actif du 1er
- en temps normal, il serait en fenêtre réduite jusqu'au clic de l'utilisateur sur un bouton (image loupe) du 1er.

J'en ai d'anciens en solde, mais comme c'est dimanche tu peux t'en bricoler un.

Fais gaffe à tes doigts.

Bien à toi