Como Moverse en los textBox en un Formt en Excel
Saludos Amigos.
Como Moverse por los TextBox Creados en Userform en Excel.
Debe de ser fácil pero no se encontralor, es crear una matriz de control de los textbox en Excel utilizando un UserFormt y varios TextBox, como en Visual basic 6.
Ejemplo en Visual Basic.6:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If TypeOf Me.ActiveControl Is TextBox Then
T = Me.ActiveControl.Index
If KeyCode = 40 And T < 5 Then 'down
KeyCode = 0
Me.Text1(T + 1).SetFocus
End If
If KeyCode = 38 And T > 0 Then
KeyCode = 0
Me.Text1(T - 1).SetFocus
End If
End If
End Sub
Si puden contestar agradezco su tiempo utilizado.
Como Moverse por los TextBox Creados en Userform en Excel.
Debe de ser fácil pero no se encontralor, es crear una matriz de control de los textbox en Excel utilizando un UserFormt y varios TextBox, como en Visual basic 6.
Ejemplo en Visual Basic.6:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If TypeOf Me.ActiveControl Is TextBox Then
T = Me.ActiveControl.Index
If KeyCode = 40 And T < 5 Then 'down
KeyCode = 0
Me.Text1(T + 1).SetFocus
End If
If KeyCode = 38 And T > 0 Then
KeyCode = 0
Me.Text1(T - 1).SetFocus
End If
End If
End Sub
Si puden contestar agradezco su tiempo utilizado.
1 Respuesta
Respuesta de Elsa Matilde
1
Sin entrar a analizar tu código, te comento que para pasar de un textbox a otro con Enter debes modificar la propiedad TabIndex, desde el cuadro de Propiedades.
El primero quizás tenga ya como valor 3, entonces el siguiente será 4 y así con todos.
Si esto no responde a tu consulta, podes escribirme aclarando un poco más tu necesidad.
El primero quizás tenga ya como valor 3, entonces el siguiente será 4 y así con todos.
Si esto no responde a tu consulta, podes escribirme aclarando un poco más tu necesidad.
Saludos cordiales,
Señora o Señorita, Elsa
Agradecimientos por su esfuerzo en contentar mi pregunta
Muchas gracias.
Quedando a sus ordenes,
Luis Moreno
Señora o Señorita, Elsa
Agradecimientos por su esfuerzo en contentar mi pregunta
Muchas gracias.
Quedando a sus ordenes,
Luis Moreno
