Anónimo
Cantidades duplicadas en una columna.
Necesito una macro para saber si hay cantidades repetidas en una columna de excel. Por su ayuda gracias. Roberto
Respuesta de jgirj
1
Puedes hacerlo de dos formas:
Por fórmula:
Supongamos que tus datos están en la columna A, creemos entonces en la columna B un mensaje que nos diga si el dato esta repetido:
En la primera celda de la columna B escribe esta fórmula
=Si(Contar.Si(A$1:A$65536;A1)>1;"Repetido";""). Replica esta misma fórmula en el resto de celdas de la columna B.
Por macro seria algo asi:
Sub Repetido
Hoja1.Range("B:B").Clear
For I = 1 To WorksheetFunction.CountA(Hoja1.Range("A1:A65536"))
If WorksheetFunction.CountIf(Hoja1.Range("A1:A65536"), Hoja1.Cells(I, 1)) > 1 Then
Hoja1.Cells(I, 2) = "Repetido"
End If
Next I
End Sub
Si tienes problemas escribe de nuevo
Por fórmula:
Supongamos que tus datos están en la columna A, creemos entonces en la columna B un mensaje que nos diga si el dato esta repetido:
En la primera celda de la columna B escribe esta fórmula
=Si(Contar.Si(A$1:A$65536;A1)>1;"Repetido";""). Replica esta misma fórmula en el resto de celdas de la columna B.
Por macro seria algo asi:
Sub Repetido
Hoja1.Range("B:B").Clear
For I = 1 To WorksheetFunction.CountA(Hoja1.Range("A1:A65536"))
If WorksheetFunction.CountIf(Hoja1.Range("A1:A65536"), Hoja1.Cells(I, 1)) > 1 Then
Hoja1.Cells(I, 2) = "Repetido"
End If
Next I
End Sub
Si tienes problemas escribe de nuevo