Copying a file using VBA

[billpq]

I have a macro where I want to add a line of code so that it copies a file from one place on my hard drive to another (I assume VBA can do this??). How can I accomplish the following from within my Excel macro (and have it overwrite without prompting if the destination file exists):

Copy c:\data\file1.xls c:\newdata\file1.xls

Thanks!!

 

[Kenneth Hobson]

Sub Test()
Rem Needs Reference: MicroSoft Script Runtime, scrrun.dll
Rem Instructions: http://support.microsoft.com/default.aspx?scid=kb;en-us;186118
    Dim FSO As FileSystemObject
    Set FSO = New FileSystemObject
    MyDocuments = FSO.CopyFile("c:\data\file1.xls", _
      "c:\newdata\file1.xls", True)
    Set FSO = Nothing
End Sub

 

[Jaafar Tribak]

Or simply use the built-in VBA function as follows :

FileCopy "c:\data\file1.xls", "c:\newdata\file1.xls"

 

[billpq]

Thank you both for the fast replies!