hola,
gracias por el enlace. Pero al final he encontrado una forma de copiar carpetas y subcarpetas:
Cita: Imports System.IO
Imports System.Text
Imports Scripting
'el siguiente código lo pondríamos dentro del evento de un botón.
Dim fso as fileSystemObject
set fso = New FileSystemObject
' dónde rutaDestino y rutOrigen son variables dónde les pasamos las rutas correspondientes.
' Dónde "Yes" es por si queremos reescribir los datos de destino. Si no quieres, pones "False"
fso.CopyFolder (rutaOrigen, rutaDestino, Yes)
saludos!