Autonumeración en un textbox
Hola amigos: encontré este link dentro las preguntas de todoexpertos http://www.todoexpertos.com/categorias/tecnologia-e-internet/software-y-aplicaciones/microsoft-excel/respuestas/baxzzm4yn3nuq/autonumeracion-en-un-textbox
funciona muy bien es el 99% de lo que necesito, solo que al momento de registrar quisiera que aumente el número no solo al momento de cerrar el formulario, porque el textbox aumenta en uno si el formulario se cerrar y se vuelve a abrir, lo que necesito es que con tan solo darle clic en mi commandbutton ya incremente el textbox.
Desde ya muchas gracias por su tiempo.
Saludos cordiales
Jesús
1 Respuesta
Tienes que poner el siguiente evento
Private Sub CommandButton1_Click()
'aumentar el valor del textbox
textbox1 = val(textbox1) + 1
'Aumentar el valor en la celda
Sheets("autonumero").Range("A1") = val(textbox1)
End Sub
Lo que te estoy poniendo son ejemplos, no conozco los nombres de tu hoja, ni la celda, ni el text ni el command, deberás adaptarlo a tu formulario. Si tienes dudas avísame
