Dim fso as Object
set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFolder copy_dir, paste_dir

--
Regards,
Tom Ogilvy



"Ronaldo" wrote in message
...
Alastair,

Tried using FileSystemObject.CopyFolder copy_dir, paste_dir but gor run
time
424 error - object required - do I need to declare something??

Thanks

Ronaldo


"Alasdair Stirling" wrote:

Try the following:

FileSystemObject.CopyFolder copy_dir, paste_dir

Regards,

Alasdair Stirling

"Ronaldo" wrote:

I need help with some code to copy a folder from one destination and
paste it
to another.

Sub Transfer()

Dim copy_dir As String
Dim paste_dir As String

copy_dir = "C:\test_source"
paste_dir = "C:\test_destination"

FileCopy copy_dir, paste_dir

It seems that filecopy is not the answer, I need something like
foldercopy.
Is there a VBA command to copy and paste folders and contents similr
to
filecopy?

Thanks
Ronaldo