XL 2013 Pavé numérique crée en VBA problème textbox

Litan44260

XLDnaute Nouveau
Bonjour a tous
J'ai trouvez il y a pas longtemps un tuto pour crée un pavé numérique sur VBA ( je ne peux pas utiliser les claviers virtuel pour plusieurs raison et j'ai pas de clavier fixe écran tactile)

j'ai les chiffres en CommandButton
quand j'action un CommandButton elle arrive dans un TextBox1
et sur j’appuie sur Entrée l'information quitte la textBOX1 vers la cellule du excel active
Par contre ce que j'aimerais c'est que au lieu de partir vers une cellule elle aille vers la textBox activ


Voici ceux que j'ai dans ma classe
VB:
Public WithEvents groupebouton As MSForms.CommandButton

Private Sub groupebouton_Click()
    ReDim Temp(0)
    ReDim Signe(0)
    Select Case groupebouton.Caption
        Case "="
            Resultat = Application.Evaluate(Pave.TextBox1.Text)
            Saisie.TextBox1.Text = Resultat
        Case "+/-"
            Saisie.TextBox1 = -Val(Saisie.TextBox1)
        Case Else
            Saisie.TextBox1 = Saisie.TextBox1 & groupebouton.Caption
    End Select
    Saisie.TextBox1.SetFocus
End Sub


Pouvez vous m'aider 
Je vous remercie
 

Litan44260

XLDnaute Nouveau
Bonjour à tous
Désolé je viens de voir que j'avais pas rajouter la photo du userfrom
userfrom.png

dysorthographie les personne n'ont que le tactile et ne peux pas utiliser la barre de tache en bas

Actuellement quand je tape sur les chiffres les donnée sont envoyer automatiquement au Textbox1 et quand je clique sur entrée c'est envoyer a la cellule active

VB:
Private Sub ToggleButton2_Click()
ActiveCell.Value = TextBox1
TextBox1 = ""
End Sub

Par contre maintenant j'aimerais faire en sorte que quand j'appuie sur le bouton entré la donnée parte dans la textbox N°X celle que j'aurais sélectionner

Merci a tous
 

Statistiques des forums

Discussions
311 737
Messages
2 082 036
Membres
101 878
dernier inscrit
1475214