aide sur clavier virtuelle dans userform

[angoul]

Bonjour
j'ai repris un modele de clavier numerique existant, que j'ai modifier un petit peut, mais je but sur un probleme.

j'ai deux texbox j'aimerai pouvoir remplir la textox1 et ensuite la textbox2

mais j'arrive pas, je n'arrive qu'a remplir la textox1

quelqu'un peut t'il m'aider?

merci d'avance

 

[JORDAN]

Re : aide sur clavier virtuelle dans userform

Bonjour Angoul,

C'est tout à fait normal
en exemple je t'ai modifier la macro du 0 pour que cela fonctionne

Private Sub Btn_0_Click()
Me.Txt_Formule2.Text = Me.Txt_Formule2.Text + "0"
End Sub

en fait il faut remplacer : Me.Txt_Formule.Text
par : Me.Txt_Formule2.Text

c'est le nom du Texbox

Bonne journée

 

[pierrejean]

Re : aide sur clavier virtuelle dans userform

bonjour angoul

Vois si cela te convient

 

[angoul]

Re : aide sur clavier virtuelle dans userform

merci de vos conseil mais sans abuser, serait t'il possible de passer d'un userform a l'autre juste en cliquant sur l'un ou l'autre et saisir apres les chiffres.
sans passer par la selection.

merci d'avance

 

[pierrejean]

Re : aide sur clavier virtuelle dans userform

Re

Tes textbox etant enabled a false (pour que l'on ne puisse rien y entrer je suppose) un click dessus ne constitue pas un evenement utilisable
J'ai donc prevu un click sur les labels et pour que l'action soit visible je l'ai couplée avec la visibilité du textbox
Essaie si possible d'acquerir le vocabulaire
tu ecris passer d'un userform a l'autre alors que tu n'as qu'un seul userform

 

[angoul]

Re : aide sur clavier virtuelle dans userform

merci encore,ce que tu a fait est super, mais tu va trouver que je suis un mec chiant
mais serait t'il possible de laisser les deux textbox visible.

peut ton faire aussi un touche ok, qui permettrait de valider mes saisies, et ainsi repartir sur une troisieme textbox?
merci encore

 

[pierrejean]

Re : aide sur clavier virtuelle dans userform

Re

Voici avec les 2 textbox toujours visibles
Mais comme je n'ai qu'un gout tres modéré pour les fils a tiroirs je te laisse creer toi même ton bouton Ok ainsi que ton troisieme textbox ,reflechir a tout ce que tu souhaites ensuite ( par exemple s'il s'agit de refaire une calculatrice ) et eventuellement revenir ensuite

 

[angoul]

Re : aide sur clavier virtuelle dans userform

merci a toi

je regarde comment faire et si j'ai besoin je me permettrait de te redemander ton aide

cordialement

 

[angoul]

Re : aide sur clavier virtuelle dans userform

bonsoir,
je revient a vous pour encore une petite modification
serait t'il possible de suprimer le click sur le label pour activer le textbox
j'aimerai plutot cliquer directement dans le textbox pour l'activer et renseigner directement les chiffres a mettre

merci d'avance

 

[angoul]

Re : aide sur clavier virtuelle dans userform

bonjour,
je revient a vous pour encore une petite modification
serait t'il possible de suprimer le click sur le label pour activer le textbox
j'aimerai plutot cliquer directement dans le textbox pour l'activer et renseigner directement les chiffres a mettre
j'ai essayer de mettre sa, mais sa marche pas
Private Sub Txtprix_click()
If Not IsNumeric(Left(Me.txtprix.Text, 1)) Then Me.txtprix.Text = vbNullString
box = True
End Sub
Private Sub Textquant_click()
If Not IsNumeric(Left(Me.Textquant.Text, 1)) Then Me.Textquant.Text = vbNullString
box = False
End Sub
merci d'avance

 

[pierrejean]

Re : aide sur clavier virtuelle dans userform

Re

Avec ce que j'ai compris
Note: la variable box est pilotée par les macros MouseDown des testbox quantité et prix
J'ai remplacé dans macro click des boutons le textbox cat par le textbox prix