Valero Angel Serrano Mercadal respondió:
Quizá debería haberte pedido todos los detalles, pero aquí tienes una macro que puede servirte directamente o ser una buena base para lo que quieres hacer. Sub MoverFicheros() Dim Ruta, Destino As String Dim fs, Carpeta, Archivo, SubCarpeta As Object...