Copy files from one folder to another using a list

Rolo18 · #3 04-13-2021, 02:39 PM

Quote:

Originally Posted by rollis13

Have you tried like this:

Code:

Option Explicit
Sub copyfiles()
    Dim m      As Variant
    Dim FileName As String
    Dim FileType As String
    FileType = ".txt"
    For m = 2 To 4
        FileName = Cells(m, 1).Value
        FileCopy "C:\Users\roberto.rodriguezram\Desktop\Source\" & FileName & FileType, _
                 "C:\Users\roberto.rodriguezram\Desktop\Destination\" & FileName & FileType
    Next
End Sub

Thank you for the response. That worked perfectly!
I did only use it for a small sample (3 files)
But when I’m using it now for my actual list which is over 1000 names it is giving me an error which is a Run time error “53”.

I noticed the reason it’s giving me this error is because since my list is so long and there are some file names on my list that aren’t on a specific folder it is causing it to not just do the ones in the file that I need resulting in the crash. Is there a way to fix this issue?

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Browse, search and copy files from one location to another based on the list given in excel sheet us	nmkhan3010	Excel Programming	2	09-07-2020 10:27 AM
List all word files in folder and subfolders	eduzs	Word VBA	5	06-09-2019 06:20 AM
VBA Word - Search Within Files Containing A String - Copy Files to New Folder	jc491	Word VBA	0	01-09-2016 12:00 PM
How to constantly and automatically copy the contacts from a shared folder to my private folder?	Paulo	Outlook	0	08-16-2015 12:06 PM
VBA - Outlook 2010 - Copy a contact list to a contact list in the public folder	bartoch	Outlook	2	08-11-2015 07:05 AM