copying folder from one location to another

[macro_learning]

can anyone please check , why is the macro written in the attached file not working?

I want to copy folder from one location to another location.

Regards,
macro_learning

 

[Luke M]

Looks like your forgot to include the reference to the Scripting library.
http://stackoverflow.com/questions/3233203/how-do-i-use-filesystemobject-in-vba

 

[macro_learning]

Thanks for you reply..

I have changed the setting ,



still the code in the attached excel is not working.

Please help.

Regards,
macro_learning

 

[Luke M]

Sorry, if you look at the example in linked, you need to create the FSO to be able to use it. Can't simply summon it out of thin air.

Sub FSO_Example()
 Dim fs As FileSystemObject
 Set fs = New FileSystemObject
 fs.CopyFolder "C:\My Dcouments\My Folder", "C:\My Dcouments\To Here\"

End Sub

 

[macro_learning]

Thank you so much... you are life saver..

what will be the code for
1. list down the name of the files in any given folder with their extension
2. and copy the files with any particular extension or type like .csv or .rpt and then paste these filesin another location.

Regards,
macro_learning

 

[Luke M]

Here's an example that loops over files and stores file names in an array. Given example uses that to open the files, but you could simply loop over the array and print the names.
http://www.rondebruin.nl/win/s3/win008.htm

For copying, FSO supports the use of wildcards, so you could do it that way.
https://msdn.microsoft.com/en-us/library/e1wf9e7w(v=vs.84).aspx