pasar datos de un archivo excel a otro

[flakasofy65]

Buenas tardes...

Necesito de vuestra ayuda.

Tengo una archivo excel (ver adjunto RPG 06-08-CR 80076) donde tengo x cantidad de datos es forma vertical, que luego esos datos los debo pasar al archivo adjunto EST. CRUDO en forma horizontal... y solo algunos datos (solo los campos pintados de amarillos en archivo RPG 06-08-CR 80076, son pasados).

Esto es utilizado para realizar estadisticas.

Esto es para evitar pasar siempre lo mismo.

Como puedo hacer?

Aguardo comentarios.

Gracias!

RPG 06-08-CR 80076.xls

EST. CRUDO.xls

[tese1969]

Buenas, flakasofy65

Desconozco si el orden en que aparecen en "EST.CRUDO...." es inamovible.......pero facilitaría mucho la cosa que siguieran el orden de aparición que tienen en el otro archivo ("RPG.....").......porque al final se trataría de ir pasando por los datos.....y en cuanto tuviera la celda el color amarillo, ese dato lo pasaría a la derecha del último que hubiera pasado.......

Además, hay datos que no veo que aparezcan.......como el del Año de Cosecha........que está en amarillo pero no lo pasas al otro........

Revisa, por favor, cuáles son realmente los que debes pasar.........

Te adelanto, de todas formas, que algo lograremos......jejejej

Un saludo,

Tese

[flakasofy65]

Buenos dias, Tese, quedaria como lo estoy enviando nuevamente, en orden de mayor a menor y ademas, agregado el 2012.

[TABLE=width: 720]

[TR]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Lote[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Año cosecha[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]CELDA[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Aflatoxina[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Humedad[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Granulometría[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Daños[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]DM[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Sucios[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]L. Sucios[/TD]

[TD=class: xl66, width: 80, bgcolor: #ffff99]Partidos[/TD]

[TD=class: xl65, width: 80, bgcolor: #ffff99]Pelados[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80060[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]5[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8,3[/TD]

[TD=class: xl67, bgcolor: transparent]94[/TD]

[TD=class: xl67, bgcolor: transparent]0,08[/TD]

[TD=class: xl67, bgcolor: transparent]0,17[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent]2,18[/TD]

[TD=class: xl68, bgcolor: transparent]8,6[/TD]

[TD=class: xl67, bgcolor: transparent]0,2[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80061[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]5[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]7,9[/TD]

[TD=class: xl67, bgcolor: transparent]97[/TD]

[TD=class: xl67, bgcolor: transparent]0,26[/TD]

[TD=class: xl67, bgcolor: transparent]0,44[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent]0,43[/TD]

[TD=class: xl68, bgcolor: transparent]8,47[/TD]

[TD=class: xl67, bgcolor: transparent]0,2[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80062[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]113[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]7,1[/TD]

[TD=class: xl67, bgcolor: transparent]93[/TD]

[TD=class: xl67, bgcolor: transparent]0,75[/TD]

[TD=class: xl67, bgcolor: transparent]0,16[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl68, bgcolor: transparent]11,62[/TD]

[TD=class: xl67, bgcolor: transparent]0,56[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80063[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]113[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8,1[/TD]

[TD=class: xl67, bgcolor: transparent]97[/TD]

[TD=class: xl67, bgcolor: transparent]0,22[/TD]

[TD=class: xl67, bgcolor: transparent]0,05[/TD]

[TD=class: xl67, bgcolor: transparent]1,12[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl68, bgcolor: transparent]8,06[/TD]

[TD=class: xl67, bgcolor: transparent]0,15[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80064[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]113[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8,1[/TD]

[TD=class: xl67, bgcolor: transparent]97[/TD]

[TD=class: xl67, bgcolor: transparent]0,84[/TD]

[TD=class: xl67, bgcolor: transparent]0,76[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent]3,7[/TD]

[TD=class: xl68, bgcolor: transparent]15,46[/TD]

[TD=class: xl67, bgcolor: transparent]1,88[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80064[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]113[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8[/TD]

[TD=class: xl67, bgcolor: transparent]93[/TD]

[TD=class: xl67, bgcolor: transparent]0,83[/TD]

[TD=class: xl67, bgcolor: transparent]0,82[/TD]

[TD=class: xl67, bgcolor: transparent]0,18[/TD]

[TD=class: xl67, bgcolor: transparent]2,24[/TD]

[TD=class: xl68, bgcolor: transparent]12,6[/TD]

[TD=class: xl67, bgcolor: transparent]0,32[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80065[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]12[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8,6[/TD]

[TD=class: xl67, bgcolor: transparent]92[/TD]

[TD=class: xl67, bgcolor: transparent]0,51[/TD]

[TD=class: xl67, bgcolor: transparent]0,19[/TD]

[TD=class: xl67, bgcolor: transparent]0,28[/TD]

[TD=class: xl67, bgcolor: transparent]0,45[/TD]

[TD=class: xl68, bgcolor: transparent]13,02[/TD]

[TD=class: xl67, bgcolor: transparent]0,68[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80066[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]12[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]9,3[/TD]

[TD=class: xl67, bgcolor: transparent]90[/TD]

[TD=class: xl67, bgcolor: transparent]0,19[/TD]

[TD=class: xl67, bgcolor: transparent]0,63[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent]0,23[/TD]

[TD=class: xl68, bgcolor: transparent]16,69[/TD]

[TD=class: xl67, bgcolor: transparent]1,26[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80067[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]6[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]9[/TD]

[TD=class: xl67, bgcolor: transparent]96[/TD]

[TD=class: xl67, bgcolor: transparent]0,15[/TD]

[TD=class: xl67, bgcolor: transparent]0,31[/TD]

[TD=class: xl67, bgcolor: transparent]0,12[/TD]

[TD=class: xl67, bgcolor: transparent]0,14[/TD]

[TD=class: xl68, bgcolor: transparent]12,35[/TD]

[TD=class: xl67, bgcolor: transparent]0,21[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80068[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]9[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8,2[/TD]

[TD=class: xl67, bgcolor: transparent]98[/TD]

[TD=class: xl67, bgcolor: transparent]0,1[/TD]

[TD=class: xl67, bgcolor: transparent]0,25[/TD]

[TD=class: xl67, bgcolor: transparent]0,34[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl68, bgcolor: transparent]1,94[/TD]

[TD=class: xl67, bgcolor: transparent]0,4[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80069[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[TD=class: xl68, bgcolor: transparent] [/TD]

[TD=class: xl67, bgcolor: transparent] [/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80070[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]3[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]9,1[/TD]

[TD=class: xl67, bgcolor: transparent]88[/TD]

[TD=class: xl67, bgcolor: transparent]0,05[/TD]

[TD=class: xl67, bgcolor: transparent]0,24[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl68, bgcolor: transparent]2,67[/TD]

[TD=class: xl67, bgcolor: transparent]0,58[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80071[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]1[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]8,5[/TD]

[TD=class: xl67, bgcolor: transparent]92[/TD]

[TD=class: xl67, bgcolor: transparent]0,15[/TD]

[TD=class: xl67, bgcolor: transparent]0,09[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent]0,55[/TD]

[TD=class: xl68, bgcolor: transparent]1,86[/TD]

[TD=class: xl67, bgcolor: transparent]0,32[/TD]

[/TR]

[TR]

[TD=class: xl67, bgcolor: transparent]CR 80072[/TD]

[TD=class: xl67, bgcolor: transparent]2012[/TD]

[TD=class: xl67, bgcolor: transparent]1[/TD]

[TD=class: xl67, bgcolor: transparent]ND[/TD]

[TD=class: xl67, bgcolor: transparent]9,8[/TD]

[TD=class: xl67, bgcolor: transparent]90[/TD]

[TD=class: xl67, bgcolor: transparent]0,3[/TD]

[TD=class: xl67, bgcolor: transparent]0,08[/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl67, bgcolor: transparent][/TD]

[TD=class: xl68, bgcolor: transparent]3,1[/TD]

[TD=class: xl67, bgcolor: transparent]0,55[/TD]

[/TR]

[TR]

[TD=class: xl69, bgcolor: yellow]CR 80076[/TD]

[TD=class: xl69, bgcolor: yellow]2012[/TD]

[TD=class: xl69, bgcolor: yellow]13[/TD]

[TD=class: xl69, bgcolor: yellow]ND[/TD]

[TD=class: xl69, bgcolor: yellow]8,7[/TD]

[TD=class: xl69, bgcolor: yellow]92[/TD]

[TD=class: xl69, bgcolor: yellow]0,09[/TD]

[TD=class: xl69, bgcolor: yellow]0,49[/TD]

[TD=class: xl69, bgcolor: yellow][/TD]

[TD=class: xl69, bgcolor: yellow]0,22[/TD]

[TD=class: xl69, bgcolor: yellow]7,07[/TD]

[TD=class: xl69, bgcolor: yellow]2,35[/TD]

[/TR]

[/TABLE]

Asi sería.

No se si estaria respondiendo tu rta, pero muchas gracias por responder.

Saludos

[tese1969]

Buenas, flakasofy65

Lo del orden de mayor a menor no lo termino de entender, pero bueno, ya veo que la estructura que necesitas es esa, incluida el año......

Tocará asociar cada valor a una variable y después ir pasando los valores de cada una a su casilla correspondiente en el archivo destino....

Cuando tenga algo, lo subo.......

Un saludo,

Tese

[flakasofy65]

Perdón es de menor a mayor... empieza con el CR 80060 y continua con el 61 - 62 - 63 y asi, y continua la numeración por mas que cambie la cosecha.

[tese1969]

ahhhhhh......te referías al orden de los registros!!!!..........la verdad es que mi pregunta iba más bien dirigida en "horizontal"...jejejeje........es decir, al orden que tienen los datos que pasas en el archivo origen y en el destino.....

lo del orden al que tú haces referencia es tan fácil como que vaya creando una línea nueva en la primera fila vacía.....por lo que los datos anteriores no los tocaría.......

Chao,

Tese

[tese1969]

Bueno, pues parece que algo vamos teniendo.......

En el fichero comprimido adjunto tienes el archivo con el código de la macro (que sería desde donde la debes ejecutar) y el "EST. CRUDO" con la columna de Año Cosecha incluida por mí.

Verás que es como un rayo (de hecho, desde que la ejecutes casi no te dará tiempo a quitar el dedo del ratón....jejeje), pero debes ir al fichero destino para ver si ha funcionado........En principio, para ejecutarla necesitas tener los 2 ficheros abiertos...........y la ejecutas desde el archivo "origen".........Si no sabes cómo hacerlo (desconozco tu nivel de macros...) pulsa Alt + F8 y te saldrá una ventanita con las macros disponibles......si no tienes otro fichero abierto, debería salirte únicamente una.......la seleccionas y pulsas "Ejecutar"........y voilá!!!........los datos están pasados.......jejejej

Lo del color amarillo en el destino no lo he incluido porque entiendo que era una referencia para saber dónde iría.....si necesitas que los datos incluidos estén en ese color......con una línea de código más.....estaría listo.....ok?

Prueba y me cuentas........

Un saludo,

Tese

Flakasofy65_Tesev1.rar

[kinehouse]

Amigos, les pido disculpas por entrometerme en este tema, pero queria pedir una ayuda similar de tese1969, en mi consulta. Veo que sigue siendo un maestro y no le ha sido dificil dar con una solucion a flakasofy65.

Ojala puedas pasarte por mi consulta y ver si puedes ayudarme. La diferencia es que yo quisiera que los datos se pasaran al libro de registro general estando éste cerrado

https://www.ayudaexcel.com/foro/macros-programacion-vba-10/pasar-datos-libro-otro-26551/

Nuevamente les pido disculpas, y gracias de antemano si pasan por aca.