Visual Basic para Aplicaciones - Codigo por producto

Hola a todos!
Espero me puedan ayudar, tengo un formulario el cual tiene diferentes opciones de productos. Lo que me piden es que cada producto tenga un código, lo cual puedo generar, pero el tema es que cuando genero un código ej. DIAI-0001 (Dije de Acero Inox.), cuando genero otro producto sale asi: ej. CAIA-0002 (Cadena de Acero inox.), cuando me dicen que debería ser CAIA-0001 y asi para todos los productos que recien se registran, pero he movido y movido el código pero no doy con la solución.
Estaba pensando que tal vez en la columna A deba buscar el ultimo código producto registrado ej. CAIA-0002 y que siga la secuencia, porque cuando movi el codigo solo buscaba el ultimo valor de la columna y si CAIA-0002 no era el ultimo valor en la columna repetia el codigo CAIA-0002.
Espero me puedan entender y ayudar, adjunto excel

• pto-vta.rar(75,5 KB)

Con estos cambios cada código tiene su numeración. Si el primer código es DAIA-0001 y el segundo tiene de prefijo CAI- el resultado sera CAI-0001 y el siguiente PUGF-0001 y el siguiente DAIA-0002 .

Que es en esencia lo que quieres.

Ahora viene el truco: En primer lugar creo una hoja que llamo CODIGOS en la que tengo los prefijo y el último número asignado. Cuando se empiece de cero todos los campos de la segunda columna estarán a cero.


Tengo un solo proceso que que se llama Obtener_Codigo y recibe un parámetro que es el número de linea del codigo.
Los optionButton llaman al Obtener_Codigo y le dice la linea de su código.
Hay dos variables publicas que son: Codi_Ref y Codi_Num que corresponden a la linea del código y el último numero asignado.
La hoja CODIGOS se actualiza cuando graba los datos en el Excel (Botón REGISTRAR)
Para mejor funcionamiento la hoja CODIGOS debería estar oculta, yo no la he ocultado para que la veas facilménte.

De esta forma nunca se creara un código repetido a menos que se manipule inadecuadamente, yo quitaria la opción de editar el código de forma manual porque no se repetida nunca y deberías actualizar la hoja CODIGOS y eso es muy complicado de revisar.

En las columnas C y D de la hoja CODIGOS pongo la fecha y la hora del último cambio para depurar, si no te interesa puedes quitarlo.

Saludos.
\\//_

• pto-vta-Ver-2.zip(72,6 KB)

Puedes crear un bucle que recorra los items de la columna y que se reconozca los primeros caracteres según un criterio. Si la cantidad recorrida y caracteres coincide con el criterio, entonces que cuente.

Si gustas, abre un nuevo libro Excel y colocar en la columna A cualquier cosa desde la fila 2 hasta la fila que desees. Luego prueba este código