Ayuda Macro Valores
Hola, intento hacer una macro para obtener "solo" los valores únicos de una hoja excel y me esta resultando imposible... Con Excel puedo quitar los valores duplicados y se supone que con el filtro avanzado "solo valores únicos" pero igualmente lo que me hace es quitarme duplicados.
Estoy trabajando con una hoja bastante grande y tengo muchos NIF duplicados,lo que necesito es que se queden SOLO los que aparecen solo una vez, es decir que si el NIF aparece dos o más veces directamente que se borre que no salga.
Espero que me ayudéis
1 respuesta
Respuesta de Luis Mondelo
1
Te mando la solución:
Situate en el primer nif de tu lista y ejecuta esta macro:
Sub solounicos() Do While ActiveCell.Value <>"" valor = ActiveCell.Value contarsi =Application.WorksheetFunction.CountIf(Columns(1), valor) If contarsi > 1 Then Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row + contarsi - 1, 1)).entirerow.delete Else ActiveCell.Offset(1, 0).Select End If Loop End Sub
Recuerda finalizar y puntuar
