Ejemplo:
Matriz
2 3
6 8
2 3
3 2
el resultado final de la búsqueda seria algo así
2 3 esta repetido 3 ocasiones
6 8 en 1 ocasión
Es importante que no importe la colocación de los números 2 3 , 3 2.
Aquí les dejo el código, Haber si alguien me puede ayudar a modificarlo.
Código:
Gracias Sub ContarRep() Application.ScreenUpdating = False With Selection Sheets.Add After:=ActiveSheet For Each MiCol In .Columns MiCol.Copy ActiveSheet.[a65536].End(xlUp).Offset(1) Next MiCol End With With ActiveSheet .[a1:b1].Formula = "Datos" With .[a:a] .Sort Key1:=ActiveSheet.[a1], Header:=xlYes .AdvancedFilter Action:=xlFilterCopy, CopyToRange:=ActiveSheet.[b1], Unique:=True End With With .Range("c2", .[b65536].End(xlUp).Offset(, 1)) .Formula = "=COUNTIF(A:A, B2)" .Cells = .Value End With .[b:c].Sort Key1:=.[c1], Order1:=xlDescending, Header:=xlYes .[a:a].Delete: .[1:1].Delete End With Application.ScreenUpdating = True End Sub