Método Application.CopyFile (Outlook)

Copia un archivo de una ubicación determinada en un almacén de Microsoft Outlook.

Sintaxis

expresión. CopyFile( _FilePath_ , _DestFolderPath_ )

expresión Variable que representa un objeto Application.

Parámetros

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
FilePath	Obligatorio	String	Nombre de la ruta de acceso del objeto que desee copiar.
DestFolderPath	Obligatorio	String	Ubicación en la que desee copiar el archivo.

Valor devuelto

Valor de objeto que representa el archivo copiado.

Ejemplo:

En el ejemplo siguiente de Visual Basic para Aplicaciones (VBA), se crea una hoja de cálculo de Microsoft Excel denominada 'MyExcelDoc.xlsx' y, a continuación, se copia dicha hoja desde el disco del usuario a la Bandeja de entrada.

Sub CopyFileSample() 
 
 Dim strPath As String 
 
 Dim ExcelApp As Object 
 
 Dim ExcelSheet As Object 
 
 Dim doc As Object 
 
 
 
 
 
 Set ExcelApp = CreateObject("Excel.Application") 
 
 strPath = ExcelApp.DefaultFilePath & "\MyExcelDoc.xlsx" 
 
 Set ExcelSheet = ExcelApp.Workbooks.Add 
 
 ExcelSheet.ActiveSheet.cells(1, 1).Value = 10 
 
 ExcelSheet.SaveAs strPath 
 
 ExcelApp.Quit 
 
 Set ExcelApp = Nothing 
 
 Set doc = Application.CopyFile(strPath, "Inbox") 
 
End Sub

Vea también

Objeto Application

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.