Forum Discussion
How do I copy some multiple photos from one folder to another?
Copy a picture or pictures
Select the picture or pictures you want to copy.
Click Home, and then click Copy
.
Click the folder where you want to paste the copy, and then click Paste
Alternatively, you can copy the picture by dragging it to another folder. If you want to move the picture rather than copy it, hold down SHIFT while you drag the picture to the new folder.
You can also copy a picture to another Microsoft Office program. Select the picture or pictures you want to copy, click Copy, witch to the other program, and then clickPaste.
I would be happy to know if I could help.
Nikolino
I know I don't know anything (Socrates)
* Kindly Mark and Vote this reply if it helps please, as it will be beneficial to more Community members reading here.
- krishank652Jun 17, 2021Copper ContributorI want to filter out lists of photos that are given in the excel sheet.
- NikolinoDEJun 17, 2021Gold Contributor
Please read this link before continuing
Welcome to your Excel discussion space!
How are you sure that what was written or copied in the Excel sheet also exists in the folder?
Here is a suggested solution with direct copying from folder to folder.Option Explicit Sub Copy() Dim rngC As Range Const cstrPfad1 As String = "c:\Bilder\" Const cstrPfad2 As String = "c:\Bilder\relevant\" If Dir(cstrPfad2, vbDirectory) = "" Then MkDir cstrPfad2 End If For Each rngC In Range(Cells(2, 1), Cells(Rows.Count, 1).End(xlUp)) Name cstrPfad1 & rngC As cstrPfad2 & rngC Next End Sub
- krishank652Jun 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
- SchnittlauchJun 17, 2021Steel Contributor
Hi krishank652 ,
$Pic =Import-Csv C:\folder\pics.csv -delimiter ';' $pic2=$pics.Pictures copy C:\folder\$pics2 C:\DestinationFolder\
Pay attention to give the csv file in the first row the right name, in my example "Pictures"
I hope I met your requirements
Best regards,
Schnittlauch"First, No system is safe. Second, Aim for the impossible. Third, no Backup, no Mercy" - Schnittlauch
My answer helped you? Don't forget to leave a like. Also mark the answer as solved when your problem is solved. 🙂
- krishank652Jun 17, 2021Copper ContributorCan you share any full example. I don't understand How & where can I run this code?