Como crear un Textbox autonumerada en userform de excel
Tengo un caso similar en el cual necesito poner un numero consecutivo en un textbox, mi problema es que he creado una macro para insertar la información capturada en el userform hacia la base de datos de excel
El botón realiza lo siguiente:
Sub Insertar_nuevo()
'
' Insertar_nuevo Macro
'
'
Range("NUEVO_CLIENTE").Select
Application.CutCopyMode = False
Selection.Copy
Range("A2").Select
Selection.Insert Shift:=xlDown
Range("NUEVO_CLIENTE").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub
Sub Insertar_nuevo()
'
' Insertar_nuevo Macro
'
'
Range("NUEVO_CLIENTE").Select
Application.CutCopyMode = False
Selection.Copy
Range("A2").Select
Selection.Insert Shift:=xlDown
Range("NUEVO_CLIENTE").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub
NUEVO_CLIENTE se refiere al conjunto de celdas (CB2:EV2)
Prácticamente copia las celdas capturadas en el user form en el rango (CB2:EV2)
Inserta la info del rango en (A2:BU2) para tener en la base de datos los consecutivos
Posteriormente la macro elimina la info de (CB2:EV2)
Obviamente puedo capturar el numero manualmente pero el chiste es que me muestre el consecutivo en el userform
No se si crear un botón que asigne el numero consecutivo pero no logro inteligirle para hacerlo o de lo contrario que automaticamente me lo asigne al abrir el userform y al momento de ejecutar la macro de guardar
¿Alguna idea?