¿Encontrar valores iguales entre columnas de Excel y copiar códigos hacia otras columnas?

Intenta:

'4c7569735f50

=si.error(buscarv(c8;$a$1:$b$10;2;falso);concatenar("max-";extrae(d7;5;10)+1))

Esto para la secuencia max-18 en donde aparece repetido a-1

Funciona bien en esa esctructura de datos, pero solo desde el correlativo a-12 hacia abajo, puesto que para a-11 debe tomar la referencia de a-10

* La segunda opcion es no hacerlo "interactivo", basicamente una vez completadas las secuencias, ¿correria un barrido de las filas de comparando las codificaciones a-? Y corrigiendo las coincidencias.

Ve tu.

a, lo olvidaba los datos los dispuse desde a1

Hola, gracias por la pronta respuesta!, pero hay un problema creo que plante algo mal, el ejemplo anterior esta con columna A-? lineal, pero esa columna no siempre es lineal, puede ser por ejemplo

A-589 MAX-01 XTR-002 MAX-05
H-20 MAX-02 HDT-876 MAX-06
X-001 MAX-03 A-589 MAX-01
A-008 MAX-04 Z-018 MAX-07

Lo único lineal es el código de las columnas MAX-??? asi como en este ejemplo que puse el A-589 esta repetido entonces se copia el código MAX-01 y al no serlo como el Z-018 continua lo lineal.

No se si sea posible hacerlo con una formula o necesitaría usar algo de VB.

Saludos y gracias!

Por eso te doy la opcion de usar macro, pero antes de meter los dedos al codigo hay que dejar en claro algunos parametros

¿1 se compararan solo 2 columnas? col 1 y 3?

¿2 el prefijo es siempre "max"?

3 la data en col 2 y 4 debe estar vacia para eralizar proceso autonumerico.

Hola te dejo las respuestas de lo que me pides

1. si solo se comparan esas columnas

2. el prefijo siempre es Max

3. la data de la col 2 esta ocupada hasta MAX-26157, la data de la col 4 esta vacía,la cual debe seguís el orden MAX-26158 hasta MAX-XXXXX

Saludos y gracias!

Ok vamos:

Lo primero que debes tener en cuenta es que los datos partiran sin rotulos, es decir desde la fila 1

2 no deben haber filas vacias entre los datos

3, el macro tomara como ultimo numero de la secuencia el ingresado en el ultimo dato de la columna B y continuara desde alli

4 no existen codigos repetidos en columna A, de lo contrario en columna D pondremos:

"El codigo esta repetido mas de una vez en A"

5. El macro avisa que ha finalizado mediante un mensaje en pantalla.

Aca el macro:

Sub correlativo()
Dim f As Long
Dim co As Long
'4c7569735f50
f = Application.WorksheetFunction.CountA(Range("C:C"))
co = Replace(Range("b" & f), "MAX-", "")
If f = 0 Then Exit Sub
Application.ScreenUpdating = False
Dim r As Range
For Each r In Range("C1:" & "C" & f)
r.Select
If Application.WorksheetFunction.CountIf(Range("A1:" & "A" & f), r) = 0 Then co = (co + 1): r.Offset(0, 1) = "MAX-" & co
If Application.WorksheetFunction.CountIf(Range("A1:" & "A" & f), r) = 1 Then r.Offset(0, 1) = "=VLOOKUP(RC[-1],R1C1:R4C2,2,FALSE)"
If Application.WorksheetFunction.CountIf(Range("A1:" & "A" & f), r) > 1 Then r.Offset(0, 1) = "El codigo esta repetido mas de una vez en A"
Next
Set r = Nothing
Range("D1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("D1").Select
Application.CutCopyMode = False
Application.ScreenUpdating = True
MsgBox "Terminado", vbInformation
End Sub