prozac

Aquí tienes el código que debes insertar en un módulo. Option Explicit Sub Auto_open() Call ListaCarpetas(Cells(1, 2).Value) 'ruta inicial End Sub Sub ListaCarpetas(ruta As String) 'Lista las carpetas a partir de la ruta origen en la columna A, desde...