.
Este es un ejemplo de formulario que introduce datos en hoja
Excel esta programado mediante VBA o Macro de Excel, es algo sencillo, pero te dará una idea de
como modificar o complementar el formulario que tu tengas, en el link del final podrás
bajar el archivo de ejemplo.
Private Sub CommandButton1_Click()
‘Inserta fila
Selection.EntireRow.Insert
‘LimpiaLimpia Los Textbox
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox4 = Empty
TextBox5 = Empty
‘Envia el cursor al Textbox1 para volver a capturar los datos
TextBox1.SetFocus
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub
Private Sub TextBox1_Change()
Range(«a2»).Select
ActiveCell.FormulaR1C1 = TextBox1
End Sub
Private Sub TextBox2_Change()
Range(«b2»).Select
ActiveCell.FormulaR1C1 = TextBox2
End Sub
Private Sub TextBox3_Change()
Range(«c2»).Select
ActiveCell.FormulaR1C1 = TextBox3
End Sub
Private Sub TextBox4_Change()
Range(«d2»).Select
ActiveCell.FormulaR1C1 = TextBox4
End Sub
Private Sub TextBox5_Change()
Range(«e2»).Select
ActiveCell.FormulaR1C1 = TextBox5
End Sub
Código que se inserta en el un módulo
Sub CargaFormulario()
‘llama al formulario
Load UserForm1
UserForm1.Show
End Sub
.
Si te gustó por favor compártelo con tus amigos
If you liked please share it with your friends