VBA Code to copy all files from Folder 1 to Folder 2

[hrayani]

Hello Friends,

I am using the below code to open folder 1

Sub OpenFolder()Dim str_folder As String
str_folder = "C:\Users\i ' M\Desktop\Folder 1"
Call Shell("explorer.exe " & str_folder, vbNormalFocus)
Copy
End Sub

I want to open folder 1 > copy all files from this folder to folder 2

Regards,

Humayun

 

[jmacleary]

Hi.

There are many examples of how to do this on the web already. Ron De Bruin's website is one - look here for a complete solution: https://www.rondebruin.nl/win/s3/win026.htm

 

[hrayani]

Hi jmacleary,

Sorry for a late reply, I was on holidays...

Thanks for providing the link. I will surely look into that and will come back to you

Regards,

Humayun