expression.CopyFile(FilePath, DestFolderPath)
expression Required. An expression that returns an Application object.
FilePath Required String. The path name of the object you want to copy.
DestFolderPath Required String. The location you want to copy the file to.
Example
The following Visual Basic for Applications (VBA) example creates a Microsoft Excel worksheet called 'MyExcelDoc.xls' and then copies it from the user's hard drive to the user's Inbox.
Sub CopyFileSample()
Dim strPath As String
Dim ExcelApp As Object
Dim ExcelSheet As Object
Dim olApp As New Outlook.Application
Dim doc As Object
strPath = "C:\MyExcelDoc.xls"
Set ExcelApp = CreateObject("Excel.Application")
Set ExcelSheet = ExcelApp.Workbooks.Add
ExcelSheet.ActiveSheet.cells(1, 1).Value = 10
ExcelSheet.SaveAs strPath
ExcelApp.Quit
Set ExcelApp = Nothing
Set doc = olApp.CopyFile(strPath, "Inbox")
End Sub