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?

Añade tu respuesta

Haz clic para o