Macro para buscar números repetidos de una hoja excel y al lado colocar el numero de veces que se repiten

Necesito una macro que busque los números repetidos de toda una hoja de excel y pasarlos a otra hoja colocándole al lado la cantidad de veces que se repite dicho numero.

1 Respuesta

Respuesta
1

Puedes poner una imagen de cómo están tus datos en la hoja y otra imagen del resultado que esperas.

Pues la información es números de 4 cifras que se repiten en varias ocasiones en un rango (a1:ix109) y la idea es dejar todos los números en una columna ;cualquiera que tu me señales y al lado las veces que se repiten en dicho rango agradezco la atención prestada

Si tus datos llegan hasta la columna "IX" entonces en la columna "IZ" ponemos tus números y en la columna "JA" las veces que se repiten.

Sub Repetidos()
'Por.Dante Amor
    col = "IZ"
    '
    c = Columns(col).Column
    Columns(c).ClearContents
    Columns(c + 1).ClearContents
    For Each n In Range("A1:IX109").SpecialCells(xlCellTypeConstants, 23)
        Set b = Columns(col).Find(n.Value, lookat:=xlWhole)
        If Not b Is Nothing Then
            Cells(b.Row, c + 1) = Cells(b.Row, c + 1) + 1
        Else
            u = Range(col & Rows.Count).End(xlUp).Row + 1
            Cells(u, col) = n.Value
            Cells(u, c + 1) = 1
        End If
    Next
    MsgBox "Fin"
End Sub

Sigue las Instrucciones para un botón y ejecutar la macro

  1. Abre tu libro de Excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. En el menú elige Insertar / Módulo
  4. En el panel del lado derecho copia la macro
  5. Ahora para crear un botón, puedes hacer lo siguiente:
  6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
  7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
  8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
  9. Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: Repetidos
  10. Aceptar.
  11. Para ejecutarla dale click a la imagen.

‘
F E L I Z A Ñ O T E D E S E A D a n t e A m o r. Recuerda valorar la respuesta. G r a c i a s
:) 

Perdón el rango es( a1:sz109), las respuestas pueden aparecer en la columna ta perdón para que mgsbox

Cambia en la macro en esta línea:

Col = "IZ"

Cambia "IZ" por la columna disponible en la que quieras que aparezcan los números, la macro pondrá en esa columna los números y en la siguiente pondrá las veces.

‘
F E L I Z A Ñ O T E D E S E A D a n t e A m o r. Recuerda valorar la respuesta. G r a c i a s
:) 

La macro funciona más que bien pero da resultados de dos o hasta tres cifras a que se debe esto si el numero de las celdas esta completo con 4 cifras otra cosa y perdone por tanta molestia al frente de los números repetidos me puede regalar su ubicación en la hoja muchas gracias

La macro no cambia los datos, si tienes datos de 2 o 3 cifras, así es como tienes los datos.

Con mucho gusto te ayudo con todas tus peticiones.

Valora esta respuesta y crea una nueva pregunta en el tema de microsoft excel, en el desarrollo de la pregunta escribe: "para Dante Amor", en la nueva pregunta me explicas cómo quieres las ubicaciones.

La macro funciona muy bien toma todos los datos de el rango a especificar pero muestra cantidades de tres dos y hasta una cifra en realidad no hay mucho problema porque son cantidades que solo aparecen una sola vez bueno al grano realmente aparecen todos los números del rango revueltos tanto repetidos como únicos me gustaría que solo aparecieran los repetidos en un orden de la cantidad de veces y su ubicación al frente de ellos agradezco por la atención prestada

H o l a:

Tienes que entrar al tema de microsoft excel y crear una nueva pregunta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas