Tabla de contenido
Este breve tutorial demostrará cómo utilizar el método CopyFolder del FileSystemObject.
Copiar carpeta con VBA FileSystemObject
Esta lección usa FileSystemObject. Para usarlo, deberá establecer una referencia a la biblioteca de tiempo de ejecución de secuencias de comandos de VB. Consulte aquí para obtener más información.
Copiar carpetas es fácil con Método CopyFolder del FileSystemObject.
12345678 | Sub FSOCopyFolder ()Atenuar FSO como nuevo FileSystemObjectEstablecer FSO = CreateObject ("Scripting.FileSystemObject")FSO.CopyFolder "C: \ Src", "C: \ Dst \" 'La carpeta Dst existeFSO.CopyFolder "C: \ Src", "C: \ DstNew" 'Se crea la carpeta DstNewEnd Sub |
Si el origen contiene caracteres comodín o el destino termina con un separador de ruta (\), se asume que el destino es una carpeta existente en la que copiar carpetas y subcarpetas coincidentes. De lo contrario, se asume que el destino es el nombre de una carpeta para crear.