Copy files from one folder to another using a list

Rolo18 · #1 04-13-2021, 10:36 AM

Hello,

I'm currently struggling to find a solution to a Macro to grab files from a source folder and copy them over the destination folder.

I will have the list of files I need copy over on A1, A2, A3... etc

I was trying to use this technique but I am getting an error run time error '438'

Any ideas what I have wrong, or does anyone have a similar working macro?

Code:

Sub copyfiles()
Dim m As Variant
Dim copier
Dim FileName As String
Dim FileType As String

    Set copier = CreateObject("Scripting.FileSystemObject")
    FileType = ".txt"
    For m = 2 To 4
    FileName = Cells(m, 1).Value

    copier.copyfiles "C:\Users\roberto.rodriguezram\Desktop\Source\" & FileName & FileType, "C:\Users\roberto.rodriguezram\Desktop\Destination\"
    Next
End Sub

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