Hola a todos,
Mi pregunta es relacionada sobre cómo aplicar una macro a varios libros Excel sin tener que abrirlos y ejecutar la macro para cada archivo. Tengo la siguiente macro:
Sub Macro1()
'
' Macro1 Macro
'
' Acceso directo: CTRL+a
'
Sheets("ESTRATEGIAS").Select
Cells.Replace What:="EMPATES (EE)", Replacement:="EMPATES (E)", LookAt:= _
xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Sheets("CALENDARIO Y RESULTADOS").Select
ActiveWorkbook.Save
End Sub
la cual me sustituye en las celdas de la hoja "ESTRATEGIAS" donde aparece el texto "EMPATES (EE)" por el texto "EMPATES (E)". Este pequeño cambio lo debo realizar en más de 100 archivos Excel y mi ordenador tarda muchísimo en abrir cada archivo. Supongo que habrá alguna manera de aplicar la macro a todos ellos sin necesidad de abrirlos. La ruta donde se encuentran los archivos es:
C:\Columna 'Y'\(nombredelarchivo).xlsx
Muchas gracias de antemano.
Para poder ejecutar la macro en un libro, Excel tiene que abrirlo.
Pero no tienes que abrirlo manualmente, abrir los archivos también es algo que se puede hacer con una macro.
para esto te puede ser útil la función DIR (http://www.necesitomas.com/recorrer-directorio-abriendo-libros)
o tal vez esto otro: http://www.necesitomas.com/trabajar-sistema-archivos
Si como dices, tarda mucho, puedes aplicar algunos trucos para que tarde menos, por ejemplo:
Puedes no actualizar la pantalla mientras se ejecuta la macro. (Application.ScreenUpdating=False)
Puedes poner el cálculo en manual y volver a cambiarlo a automático cuando necesites recalcular, para evitar cálculos intermedios. (Application.Calculation=xlCalculationManual)
------
Ya sé Excel, pero necesito más.