Macro VBA Error 52 en tiempo de ejecución. Nombre o número de archivo incorrecto

[Gsus]

Buenas,

Estoy con una macro para subir archivos a una ruta de sharepoint directamente. Si lo que subo es una copia del libro actual o una hoja concreta no hay problema. Pero si lo que hago es seleccionar un archivo de una ruta para cargarlo desde la macro me sale ese error... he probado con varios tipos de ficheros, tanto de excel como pdf... con nombres sin caracteres raros y no consigo sacarlo, alguna idea? subo ejemplo con el código.

Gracias de antemano

 

Se me para en esta línea con ese error: FileCopy archivoSeleccionado, RutaDestino & Dir(archivoSeleccionado)

 

ejemplo_foroAE.7z

[Israel Cassales]

¡Vaya! Ha pasado un tiempo, tal vez ya lo hayas resuelto, sin embargo es bueno dejar algunas opciones en el foro que podrían ser útiles. El error que estás experimentando puede ser causado por varias razones.

Revisa lo siguiente:

• Archivo abierto: La instrucción FileCopy en VBA produce un error si intentas copiar un archivo que está actualmente abierto. Asegúrate de que el archivo que estás intentando copiar no esté abierto en otro lugar.
• Ruta de destino incorrecta: La función FileCopy no puede copiar un archivo directamente a una URL de SharePoint. Necesitas mapear tu sitio de SharePoint como una unidad de red en tu sistema y luego usar esa ruta de la unidad mapeada en tu código.

Además debes especificar la carpeta de destino y el nombre del archivo de destino (y no solo la carpeta de destino).

Algo así:

FileCopy archivoSeleccionado, RutaDestino & "\" & Dir(archivoSeleccionado)

Saludines