Visual Basic - Error al copiar ficheros

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

lo has seguido paso a paso (con F8) para ver el contenido de la variable "desde"?

sino, haz lo siguiente:

Dim objSistemaDeArchivos As Object
Dim sRutaOrigen As String
Dim sRutaDestino As String

Set objSistemaDeArchivos = CreateObject("Scripting.FileSystemObject")

sRutaOrigen = "\\HIDRA-DESA\d$\inetpub\wwwroot\PFTR\" & desde
sRutaDestino = "\\Datos_lantik\E0104\DESA\PF\ENTREGABLES_EN_CURSO\SOFTWARE\Copias\Ainhoa\" & desde

objSistemaDeArchivos.CopyFile sRutaOrigen, sRutaDestino
Set objSistemaDeArchivos


y luego pon un "BreakPoint" en la línea "objSistemaDeArchivos.CopyFile sRutaOrigen, sRutaDestino" y consulta en la ventana "Inmediate" (o poniendo el cursor dos segundos sobre las variavble) los valores de las variables, para ver si te los está generando bien.

Saludos!!!