I forgot the line of code to create the FSO.

Dim FSO As Scripting.FileSystemObject
Set FSO = New Scripting.FileSystemObject
FSO.CopyFolder old_folder, new_folder, True


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Chip Pearson" wrote in message
...
To use the FileSystemObject, you need to set a reference (VBA,
Tools menu, References) to the "Microsoft Scripting Runtime"
library. Then, declare a variable with a FileSystemObject type,
and use that variable.

Dim FSO As Scripting.FileSystemObject
FSO.CopyFolder old_folder, new_folder, True



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"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