Error al copiar ficheros

[astrow25]

Hola tengo este trozo de codigo

Dim objSistemaDeArchivos As Object
Set objSistemaDeArchivos = CreateObject("Scripting.FileSystemObject")
objSistemaDeArchivos.CopyFile "\\HIDRA-DESA\d$\inetpub\wwwroot\PFTR\" & desde, "\\Datos_lantik\E0104\DESA\PF\ENTREGABLES_EN_CURSO \SOFTWARE\Copias\Ainhoa\" & desde
Set objSistemaDeArchivos = Nothing

Donde desde es el archivo, y cuando ejecuto me sale un error diciendome


Error '53' en tiempo de ejecucion
No se ha encontrado el archivo

Si lo pongo a pelo si funciona

[.seb]

verifica que desde tenga unicamente el nombre del archivo y no la ruta completa, de ser así es obvio que te dé el error mencionado