Forum Discussion
krishank652
Jun 17, 2021Copper Contributor
How do I copy some multiple photos from one folder to another?
I have a list of names of photos that I have required to copy from one folder to another. How Can I do that? List of Photos name that I have required to copy in a New Folder:- qa List of ...
krishank652
Jun 17, 2021Copper Contributor
I am using OS: Windows10 and Product: Microsoft office professional plus 2016
Yes, photos exist in the folder and their names exist in the excel sheet.
I run this code in Macro. It's showing an error
NikolinoDE
Jun 17, 2021Gold Contributor
As ordered 🙂
You have to specify the path in the code and the name of the new folder where you want to go.
Easy to do.
It worked for me without any problems (test under Excel 2016 and Windows 10, as desired).
I wish you a lot of fun with Excel.
I would be happy to know if I could help.
Nikolino
I know I don't know anything (Socrates)
- amol bhosaleMay 11, 2022Copper Contributor
- HansVogelaarMay 11, 2022MVP
Try this macro:
Sub CopyFiles() ' Folder containing the images. Path must end in \ Const SourcePath = "C:\MyFiles\Source\" ' Folder to copy the images to. Path must also end in \ Const TargetPath = "C:\MyFiles\Target\" Dim r As Long Dim LastRow As Long LastRow = Range("A" & Rows.Count).End(xlUp).Row For r = 1 To LastRow FileCopy SourcePath & Range("A" & r).Value, TargetPath & Range("A" & r).Value Next r End Sub
- AryanVerma1988Sep 14, 2022Copper Contributor
your codding are working but some error is showing when we open the file.
can you check why this error are coming
Thanks