OVH Cloud OVH Cloud

FOCUS ?

5 réponses
Avatar
Bruno Frisque
Bonjour,

Est-il possible se savoir quel champ a le focus dans un form ?
Quelque chose comme
If Text0.hasfocus = true then ..............
If Text100.hasFocus then .....

J'ai besoin de cela pour exploiter des boutons contenant les générations de
caractères spéciaux. (Æ etc)
Cela marche bien mais comment savoir dans quel champ les placer ??

D'avance merci

5 réponses

Avatar
CC
Pour savoir quel contrôle a le focus tu fais un :
ActiveControl.Name

"Bruno Frisque" a écrit dans le message de
news:%
Bonjour,

Est-il possible se savoir quel champ a le focus dans un form ?
Quelque chose comme
If Text0.hasfocus = true then ..............
If Text100.hasFocus then .....

J'ai besoin de cela pour exploiter des boutons contenant les générations
de

caractères spéciaux. (Æ etc)
Cela marche bien mais comment savoir dans quel champ les placer ??

D'avance merci







Avatar
Bruno Frisque
OK cela semble marcher si on met
Set ctlCurrentControl = Screen.ActiveControl
au LostFocus du champ prêt à recevoir les caractères ...

encore merci




"CC" wrote in message
news:cfdcsb$pom$
Pour savoir quel contrôle a le focus tu fais un :
ActiveControl.Name

"Bruno Frisque" a écrit dans le message de
news:%
Bonjour,

Est-il possible se savoir quel champ a le focus dans un form ?
Quelque chose comme
If Text0.hasfocus = true then ..............
If Text100.hasFocus then .....

J'ai besoin de cela pour exploiter des boutons contenant les générations
de

caractères spéciaux. (Æ etc)
Cela marche bien mais comment savoir dans quel champ les placer ??

D'avance merci











Avatar
Bruno Frisque
(Sorry d'avoir répondu en direct sur ton mail..)

Hélas ....
la procédure donne le cmd3 c-à-d le bouton de création d'un caractère
spécial ....
Il faudrait donc savoir qui avait le Focus AVANT d'entrer dans les boutons
de création de caractères ...

Dim ctlCurrentControl As Control
Set ctlCurrentControl = Screen.ActiveControl
Debug.Print ActiveControl.Name <<<<<<<<<< donne cmd3
If ctlCurrentControl.Name = "Text0" Then
Text0 = Text0 & MyChar

ElseIf ctlCurrentControl.Name = "Text119" Then
Text119 = Text119 & MyChar
End If

C'est compliqué hein ??
Merci de ta réponse

"CC" wrote in message
news:cfdcsb$pom$
Pour savoir quel contrôle a le focus tu fais un :
ActiveControl.Name

"Bruno Frisque" a écrit dans le message de
news:%
Bonjour,

Est-il possible se savoir quel champ a le focus dans un form ?
Quelque chose comme
If Text0.hasfocus = true then ..............
If Text100.hasFocus then .....

J'ai besoin de cela pour exploiter des boutons contenant les générations
de

caractères spéciaux. (Æ etc)
Cela marche bien mais comment savoir dans quel champ les placer ??

D'avance merci











Avatar
Bruno Frisque
Merci 3Stone

Screen.PreviousControl, hein ?

Je vais essayer directly, pour voir si c'est + efficace que mon code
improvisé...

Encore merci à toi, et au Groupe

à +
bruno



ps : çà n'intéresse personne, mon petit form de 29 buttons, qui créent des
caractères (tout à fait) spéciaux ?
(genre : Æ, ß, Ø, Y ....)





"3stone" wrote in message
news:%
Salut Bruno,

"Bruno Frisque"
Il faudrait donc savoir qui avait le Focus AVANT d'entrer dans les
boutons


de création de caractères ...



Voir :

= Screen.PreviousControl


--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------









Avatar
3stone
Salut Bruno,

"Bruno Frisque"
Il faudrait donc savoir qui avait le Focus AVANT d'entrer dans les boutons
de création de caractères ...



Voir :

= Screen.PreviousControl


--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------