Buscar y actualizar datos de un archivo a otro archivo

[caguamil]

Saldos a todos.

Pido de su amable apoyo para resolver errores en tiempo de ejecución de un macro; básicamente lo que hace el macro es buscar los códigos del archivo A en el archivo B y si lo encuentra debe marcar en el archivo A en celdas especificas una leyenda y un dato contenido en el archivo B en la fila correspondiente al dato encontrado.

Errores en tiempo de ejecución:

"Unable to get the Activate property of the Range class"

"Object variable or With block variable not set"

Les dejo ambos archivos que son: A "Inv (PRUEBAS)" y B "INVENTARIO (PRUEBAS)"

Espero puedan ayudarme con la solución. Gracias.

Archivos.rar

[tese1969]

Podrías adjuntar los archivos con los nombres reales?

Es que tu macro corre directamente bajo esos nombres y así no sería necesario modificar nada de eso y poder comprobarlo...

Un saludo,

Tese

[caguamil]

tese1969, perdón, subí los archivos equivocados, ahora si van los buenos y gracias por la observación.

Archivos_actual.rar

[tese1969]

Tras abrir el archivo y ver correr la macro creo que tienes varios problemas......lo que no sé es si quieres modificar esa hasta que funcione.......o crear otra que lo haga más fácil, que según mi punto de vista........sería lo adecuado.....pero claro, tú eliges.....

Hay algunas líneas del código que no tienen ningún sentido..........todas aquellas que terminan en ".Copy" no deberían existir, pues no hay ni un solo "Paste" después..........y obviamente no es necesario hacer eso para "captar" el valor...

En fin, tú decides...

Un saludo,

Tese

[caguamil]

Tese, gracias por tus comentarios, y sobre los copy, bueno, es solo mal habito.

Por otra parte, que sugieres para simplificarlo, porque la verdad si me gustaría dejarlo mas funcional y que sea mas adaptable.

[tese1969]

Cuidado con los habitos, caguamil.........jejejeje........que tener una celda "copiada" puede complicarte la vida en muchas ocasiones....además, creo que si no necesitas "físicamente" tenerla.......el copy hará más lento todo.........pero bueno, tú sabrás....jejeje

Mi propuesta consistiría en un simple bucle del tipo "For each.............next"......tomando como referencia cada celda de la columna "A" del archivo origen...........buscarla en el destino y si la encuentra pues que haga lo que deba hacer y si no pues que haga otra cosa.......y cuando la celda de origen esté vacía.......pues que pare.......

Es muy simple y cortito el código..........y no necesitas estar activando continuamente ambos archivos......

Tú me dices.....

Tese

[caguamil]

Tese, me parece muy buena tu idea, el único problema es que el uso del "For" siempre se me ha complicado; por lo cual, me puedes ayudar con ello por favor?

[tese1969]

Cuenta con ello.............a ver si después del Madrid-Barça me pongo con ello.......jejejeje

Chao,

Tese

- - - - - Mensaje combinado - - - - -

Buenas de nuevo......

Ahí tienes tus archivos con un nuevo módulo........prueba a ver si te funciona.......

He visto códigos repetidos en el fichero origen.......imagino que sería como ejemplo........si los tuvieras de verdad repetidos, entonces quizás habría que filtrar por otro campo........

Bueno, ya me cuentas.......

Chao,

Tese

Caguamil.rar

[caguamil]

Antes que nada muchas gracias Tese por tu ayuda, y por otra parte, tal como observaste si hay códigos repetidos y el problema es que entre las dos bases de datos es el único dato que se puede relacionar, y ademas una de las bases de datos contiene mas registros que la otra.

Inv (PRUEBAS) 8559 registros

INVENTARIO (PRUEBAS) 5592 registros

Espero que la información que te doy te sea de utilidad para poder solucionar mi dilema, que te comento, el código que use, en algún momento lo hice funcionar, pero de eso ya tiene mas de medio año y ya no me acuerdo que hice, aparte el archivo donde estaba la macro me lo borraron, ya sabes los de sistemas y sus mantenimientos jejeje....

Oh! y se me olvidaba, por los códigos repetidos, el bucle For... no funciono.

[tese1969]

Pero entonces, qué otra información (columna) necesitas para saber si es esa línea la que buscas u otra?

Recuerda que en tu archivo no hay ningún otro dato "legible"....son todo XXXXXXXXXXX.......me da que quizás necesitaras tener en cuenta el concepto........pero tú eres el que sabes.........

De momento, magia no hacemos......jejejeje

Y cuando dices que el bucle For no funcionó imagino que te referirás a que había otra información que debería haber salido y no al propio funcionamiento del bucle........yo lo probé y funcionaba.....

Un saludo,

Tese