Ho risolto effettivamento mi mancava na riga :gren:

codice:
Set fso = CreateObject("Scripting.FileSystemObject")
fso.copyfolder origine, destinazione
Ciapz