Código para guardar datos con un commandbuton
Hola experto
Tengo un userform con 7 textbox que ya tienen celdas asignadas en una fila; el problema es que no se que código colocarle al commandbuton para que me grabe los datos en esas celdas y que los siguientes datos que ingrese en los textbox me los coloque en la fila de abajo y así sucesivamente.
Muchas gracias
Tengo un userform con 7 textbox que ya tienen celdas asignadas en una fila; el problema es que no se que código colocarle al commandbuton para que me grabe los datos en esas celdas y que los siguientes datos que ingrese en los textbox me los coloque en la fila de abajo y así sucesivamente.
Muchas gracias
1 respuesta
Respuesta de Eduard Caballero
1
No debes asignarles celdas especificas.
Este seria el código de ejemplo para para colocar 3 textbox. Lo adaptas a tus necesidades. Debes colocarlo en el evento clic del commandbuton
Worksheets("Hoja1"). Activate
ActiveSheet. Range("A2"). Activate
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop
Activecell=textbox1
Activecell.offset(0,1)=textboxt2
Activecell.offset(0,2)=textboxt3
Este seria el código de ejemplo para para colocar 3 textbox. Lo adaptas a tus necesidades. Debes colocarlo en el evento clic del commandbuton
Worksheets("Hoja1"). Activate
ActiveSheet. Range("A2"). Activate
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop
Activecell=textbox1
Activecell.offset(0,1)=textboxt2
Activecell.offset(0,2)=textboxt3
