XLA routines: EE_CopyFile

EE_CopyFile copies a file from one place to the next
Sub EE_CopyFile(strFullFilePath As String, strTarget As String) 'http://excelexperts.com/xla-routines-eeCopyFile for updates on this sub routine If EE_FileNameFromFilePath(strFullFilePath) = EE_FileNameFromFilePath(strTarget) Then 'FileCopy strFullFilePath, strTarget Call CreateObject("Scripting.FileSystemObject").CopyFile(strFullFilePath, strTarget) Else 'FileCopy strFullFilePath, strTarget & Application.PathSeparator & EE_FileNameFromFilePath(strFullFilePath) Call CreateObject("Scripting.FileSystemObject").CopyFile(strFullFilePath, strTarget & Application.PathSeparator & EE_FileNameFromFilePath(strFullFilePath)) End If End Sub
»
- Nick's blog
- Login or register to post comments
- 3123 reads
Recent comments
6 years 4 weeks ago
6 years 42 weeks ago
7 years 2 weeks ago
7 years 4 weeks ago
7 years 5 weeks ago
7 years 11 weeks ago
7 years 19 weeks ago
7 years 19 weeks ago
7 years 20 weeks ago
7 years 20 weeks ago