Copy Workbook Without Opening

[Carly]

Is there a quick way to copy a workbook to another location & name without opening it?

 

[Carly]

Sorry I found it here:

http://www.mrexcel.com/forum/showthread.php?t=52942

Google search was better than the search on Mr Excel.com

 

[Jon von der Heyden]

Like this:

Public Sub CopyFile()
    Dim objFSO As Object
    
    Const strFileNameAndPath As String = "C:\........"
    Const strNewFileNameAndPath As String = "C:\...."
    
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    objFSO.CopyFile strFileNameAndPath, strNewFileNameAndPath, Fase
End Sub

 

[Jon von der Heyden]

Sorry I found it here:

http://www.mrexcel.com/forum/showthread.php?t=52942

Google search was better than the search on Mr Excel.com

I didn't know about FileCopy. No need for FSO, go with that...