mariobar

Cadipas spain respondió: Prueba esto, he anulado dos líneas (espero que sea el resultado que buscas) Sub comparando() Application.ScreenUpdating = False copiada = 2 Sheets("Cdec-00").Select Range("A2").Select final = Range("A2").End(xlDown).Row For fila = 2 To final For...

kapapri respondió: Algunos alcances. Estas copiando desde cdec-00 a la hoja nueva. Ahora bien si hoja nueva tiene más lineas que hoja cdec-oo solo comparara hasta el final de lineas de cdec-00. otra cosa estas saltandote 2 lineas en nueva, ya que pones fila2=fila2+1 y...