Bienvenido a la mayor comunidad de usuarios EXCEL
Regístrate gratis ahora para ver contenidos y descargas sin restricciones!Regístrate gratis Ingresar
OPTIMIZACIÓN CÓDIGO
- Autor del tema albersil
- Fecha de inicio
albersil dijo:
Macro Antonio
Moderator
- Registrado
- 22 Dic 2009
- Mensajes
- 11.144
Hola:
Esto es lo mas reducido que puede quedar.
Esta macro hace lo que hacen todas las demás juntas.
Esto es lo mas reducido que puede quedar.
Esta macro hace lo que hacen todas las demás juntas.
Código:
Sub COMPARALIBROS_MA()
Dim VEC(7) As String
Dim DAT(7) As String...Macro Antonio
Moderator
- Registrado
- 22 Dic 2009
- Mensajes
- 11.144
Ya ne he dado cuenta de un error:
sustituye:
por:
Saludos
sustituye:
Código:
MARCAS = Array("3", "4", "5", "C", "T", "FS", "FT")por:
Código:
MARCAS = Array("","3", "4", "5", "C", "T", "FS", "FT")Saludos
He intentado analizar el código para saber qué es lo que hace exactamente, pero no consigo descifrarlo lo suficiente como para adaptarlo a otros ficheros que también necesito. Abusando de vuestra...
Macro Antonio
Moderator
- Registrado
- 22 Dic 2009
- Mensajes
- 11.144
Hola:
En el adjunto encontrarás:
1 Hoja nueva con el nombre Archivos, en ella debes informar los archivos que quieras comparar y la marca a utilizar en caso de emparejamiento...
En el adjunto encontrarás:
1 Hoja nueva con el nombre Archivos, en ella debes informar los archivos que quieras comparar y la marca a utilizar en caso de emparejamiento...
Se me olvidó enviar el adjunto. Perdón.
albersil dijo:
Bueno después de repasar una y mil veces los ficheros, me he dado cuenta que el código intenta abrir ficheros desde la primera...
El error que sale es:
Se ha producido el error '9' en tiempo de ejecución:
Subíndice fuera de intervalo.
y sale el error después de que la variable X tome el valor 2 y justo antes de que cambie...
Se ha producido el error '9' en tiempo de ejecución:
Subíndice fuera de intervalo.
y sale el error después de que la variable X tome el valor 2 y justo antes de que cambie...
albersil dijo:
Macro Antonio
Moderator
- Registrado
- 22 Dic 2009
- Mensajes
- 11.144
Hola:
Bueno, ya te he hecho sufrir bastante.
Te adjunto de nuevo el archivo, esta vez probado y optimizado.
Saludos
Bueno, ya te he hecho sufrir bastante.
Te adjunto de nuevo el archivo, esta vez probado y optimizado.
Saludos
Antoni dijo:
La verdad es que he estado gran parte de la tarde...
Antoni dijo:
Probado y funcionando al 99,99 %. Me explico...
Macro Antonio
Moderator
- Registrado
- 22 Dic 2009
- Mensajes
- 11.144
Ahora creo que si.
Saludos
Saludos
albersil dijo:
De momento lo que he hecho para que funcione es desagrupar las celdas de la columna 1 donde hay horarios y meter un espacio en las que no hay datos. De esta forma funciona bien y ya presenta todas...
Solucionado también lo de que los libros estén en diferentes directorios. A lo mejor no es lo más correcto o eficaz desde el punto de vista de las buenas técnicas de programación, pero es lo único...
Antoni dijo:
Bueno efectivamente, ahora si. Tú con cambiar solamente una línea en la función TratarFila lo has conseguido, mientras que yo me he liado más y...
