Con esta macro pueden abrir todos los archivos de un directorio, procesarlos y cerrarlos. Sub RevisaDirectorio() Dim ruta As String Dim siguienteArchivo As String Dim libro As Workbook Dim máscara As String ruta = InputBox(“¿Qué directorio proceso?”) ruta = ThisWorkbook.Sheets(“Portada”).Range(“RutaDirectorio”) …

Macro para abrir y cerrar todos los archivos de un directorio Read more »