Formulario en Excel 2003 UserForm (Va dirigida a Dante Amor)
Hola Dante, por favor si podes sacarme de una duda, por que cuando termino de ingresar el dato en el textbox1 luego de dar el "enter" salta al textbox5 y no como yo necesito que se posicione en ComboBox1 y así sucesivamente? Te anexo la macro.-
Desde ya muchas gracias
Private Sub Btn_Registrar_Click()
ActiveSheet.Cells(12, 1).Select
Selection.EntireRow.Insert
Range("N2").Select
Selection.Copy
Range("A12").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveSheet.Cells(4, 17) = TextBox1
ActiveSheet.Cells(12, 4) = ComboBox1
ActiveSheet.Cells(12, 5) = ComboBox2
ActiveSheet.Cells(12, 6) = ComboBox3
ActiveSheet.Cells(12, 7) = TextBox5
ActiveSheet.Cells(4, 18) = TextBox6
ActiveSheet.Cells(4, 19) = TextBox7
ActiveSheet.Cells(4, 20) = TextBox8
ActiveSheet.Cells(4, 21) = TextBox9
ActiveSheet.Cells(12, 12) = TextBox10
TextBox1 = Empty
ComboBox1 = Empty
ComboBox2 = Empty
ComboBox3 = Empty
TextBox5 = Empty
TextBox6 = Empty
TextBox7 = Empty
TextBox8 = Empty
TextBox9 = Empty
TextBox10 = Empty
TextBox1.SetFocus
Traspaso
End Sub
1 respuesta
Para ordenar los textbox y los combobox o incluso todos los controles de tu form, tienes que modificar la propiedad de Tabindex de cada control.
Abre tu formulario y selecciona el textbox1, ahora en las propiedades del TextBox1, busca la propiedad TabIndex; en el campo de la propiedad escribe el número 1.
Ahora selecciona el siguiente control según la secuencia que desees, por ejemplo selecciona el ComboBox1 y en la propiedad de TabIndex introduce el número 2.
Realiza lo mismo para todos los controles y de esa forma, al momento de la captura se pasará al siguiente control que deseas.
Saludos. Dante Amor
Recuerda valorar la respuesta.
