Colección de citas famosas - Colección de consignas - Use VBA para verificar si hay datos en la columna A en la columna B y marque los duplicados en la columna A como datos amarillos. Es muy conveniente pedir consejo.
Use VBA para verificar si hay datos en la columna A en la columna B y marque los duplicados en la columna A como datos amarillos. Es muy conveniente pedir consejo.
La cantidad de datos es grande y los bucles dentro de las celdas serán más lentos. El número de bucles es un producto, por lo que es diferente de una matriz.
Este código usa el método de diccionario para juzgar y usa un bucle de matriz al mismo tiempo. El número de bucles es 2 veces.
El código es el siguiente
Subtest()
Disposición tenue, x & amp
Dim d como objeto
set d = CreateObject(" scripting . diccionario ")
arr = Hoja1. Utilice rango
Para x = 1 hasta el límite inferior (arr)
d(arr(x, 2)) = " "
Siguiente x
Para x = 1 al límite inferior (arr)
Si d.exists(arr(x,1)), entonces
Hoja1. Cells(x, 1).Interior.ColorIndex = 6
Terminará si...
Siguiente x
borrar todo
.Borrar disposición
Finalizar conector