Agilizar Macros en excel-generan muy lento

[bersi_yordin]

buenas tardes, una consulta soy nuevo en esto de los códigos y todo el tema, cree un Excel con macros pero tarda mucho en hacerlas todas, la macro consta de dos libros uno como base y otro donde...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Hola,

No tengo tiempo para hacer que corra bien en mi PC pero... evita:

1.- Hacer cosas como:

Cells.Select
Cells.EntireRow.AutoFit
With Selection
.WrapText = True...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gabriel Raigosa]

Hola,

He estudiado el proceso, no voy a decir nada de las macros, quiero comentar algo sobre el mismo.

• Primero

El libro "asistencias.xls", que lo descargas del sistema...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bersi_yordin]

Hola,

He estudiado el proceso, no voy a decir nada de las macros, quiero comentar algo sobre el mismo.

• Primero

El libro...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gabriel Raigosa]

Asistencias.xlsx, no puedo tocarlo es base del sistema de asistencia, se encuentra en el servidor

Si pudieras guardar como y...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bersi_yordin]

Si pudieras guardar como y hacer una copia local en tu PC se resuelve el problema, consultando la copia xlsx local.

[ATTACH type="full"...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gabriel Raigosa]

si es complicado,

Sistemas...

Algunos de ellos son expertos en hacer que lo fácil sea mas difícil.

Comienza por depurar esas...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Mientras vas avanzando... que no veo ningún avance... también toma en cuenta que:

1.- Abusas de las sentencias:

Cells.Select
Cells.EntireColumn.AutoFit...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bersi_yordin]

NOTA: Si vas avanzando a lo mejor me atrevo a revisarlo...!!!

Buenas tardes, adjunto nuevamente el archivo que estoy trabajando...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

de resto las macros están corriendo más rápido, igual agradeceria sus recomendaciones y mejoras

Por lo que veo, ese Bucle lo que hace...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bersi_yordin]

es muy variable ya que es la asistencia diaria del personal, son entre 2 a 6k de filas para reducir a 200 o menos

 

[bersi_yordin]

es muy variable ya que es la asistencia diaria del personal, son entre 2 a 6k de filas para reducir a 200 o menos

[QUOTE="Leopoldo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Bueno, por lo que veo... Esta Macro se tarda menos de 0.6 segundos con más de 10,000 registros, depende la PC. en hacer los acumulados.

Sub a()
    Dim i&, Suma#, t#...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gabriel Raigosa]

Si pudieras guardar como y hacer una copia local en tu PC se resuelve el problema

Revisa la "ruta origen" del adjunto, esta macro...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bersi_yordin]

Bueno, por lo que veo... Esta Macro se tarda menos de 0.6 segundos con más de 10,000 registros, depende la PC. en hacer los acumulados...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bersi_yordin]

Revisa la "ruta origen" del adjunto, esta macro carga los datos de "asistencias.xls" a un archivo local en formato nuevo y como tabla, ya con...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

gracias amigo, anqué tuve que usar ambos códigos que me dejaste, ya que el primero no eliminaba los duplicados solo los reducía a 2 por cedula...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí