Acelerar ejecucion de macro

[jguerrerot]

Buenas

Tengo una macro que copia información de una hoja a otra en donde realiza unos cálculos con fórmulas de la misma hoja y luego regresa el resultado a la hoja de origen. La macro demora aproximadamente 1 hora para calcular 30 mil registros y es demasiado. Ya he intentado con todas las formas de acelerar la ejecución de macros que encontré en Internet y no logro que baje el tiempo de ejecución.

Por favor, pueden darme una mano con la aceleración de la macro???

Hay forma de que el Excel use un mayor porcentaje del procesador y de la memoria de la máquina para que realice el cálculo de forma más rápida??

Les adjunto la macro.

De antemano, muchas gracias por la ayuda que me puedan brindar.

https://rapidshare.com/files/2246437309/macro.zip

[Antoni]

El 90% del tiempo se lo lleva el recálculo de las fórmulas.

Yo he conseguido reducir el tiempo total a solo 10 minutos, pero a costa de hacer algo que a ti te toca evaluar si afecta o no al proceso general.

He pasado el cálculo de las fórmulas a manual al principio de la macro, he eliminado todos los cálculos automáticos de fórmulas y he añadido solo uno al final.

Tu verás si eso es admisible, o no, desde un punto de vista funcional.

En cuanto al tema de la memoria, ejecuta la macro sin ningún otro proceso arrancado, ni siquiera el explorador de Internet.

[jguerrerot]

Hola Macro Antonio

Lo que indicas no es factible, ya que la macro no realizaría el cálculo por cada registro sino con algunos.

[Antoni]

Lo lamento, pero no he visto nada sustancialmente importante que ayude a mejorar el tiempo total de la ejecución.

[digitalboy]

El 90% del tiempo se lo lleva el recálculo de las fórmulas.

En efecto, en la hoja LXMensual tienes mas de 5000 celdas con formulas y en la hoja Calculo mas 27000! Imagina la gran carga para el procesador aun teniendo uno de doble nucleo...

Esto no es problema de memoria amigo! sino de la gran sobrecarga para el procesador! Al dejar que las formulas se actualicen automaticamente, esto es cada que modificas una celda se actualiza todo, por eso la gran lentitud!

Adjunto un ejemplo de una macro similar a lo que tu haces valiendote de formulas y una alternativa la cual busca evitar el uso de formulas en la cual tu tienes que realizar los calculos y asignarlos a variables, espero que sea entendible lo que quiero expresar. En mi ejemplo al evitar formulas se reduce a menos de la mitad del tiempo el proceso, seria cuestion de ver si te es factible reacer los calculos y trabajarlos en variables.

Saludos!

prueba.zip

[jguerrerot]

Hola DigitalBoy

Voy a revisar lo que indicas, aunque ya he estado probando algo similiar con los buscarv, hacer estos en codigo y no en la hoja excel, pero demoran 11 segundos más de lo que se demora en la hoja excel.

[digitalboy]

Voy a revisar lo que indicas, aunque ya he estado probando algo similiar con los buscarv, hacer estos en codigo y no en la hoja excel, pero demoran 11 segundos más de lo que se demora en la hoja excel.

Amigo! también son funciones que incluso consumen mas tiempo... seria bueno intentarlo con python (ignora lo de python!) no se me ocurre otra cosa mas que emplear variables, pudiera usarse una matriz!

[jicotillo]

Sugiero un buen libro y un cafe, para esperar, jaja, a mi me pasa lo mismo, con un archivo que vincula mi excel con aspel coi, el tiempo de proceso es como de 45 minutos, eso cerrando todas las aplicaciones. La unica forma de bajar el tiempo era con menos vinculos, pero eso dejaria incompleta la informacion, ahora que lo pienso cada vez son mas minutos pues conforme pasa el tiempo es mayor la informacion que se procesa. Asi que por el momento lo mejor sera ser paciente.

[digitalboy]

Hola!

Sin querer me tope con esto:

Application.Calculate 'esta sentencia calcula todas las formulas de los libros abiertos

Teniendo las opciones de calculo en manual podrias utilizar:

Range("A1:A10000").Calculate 'Recalcula las formulas para el rango especificado y las demás formulas las ignora.

Como veras... te tocaría a ti ver que rangos recalcular y cuales no.

Espero que esto te sirva de algo!