VBA - Recuperar datos de un libro cerrado

Hola a todos,

Estoy comenzando en VBA y tengo el siguiente problema:

Tengo un archivo A y un archivo fuente. Quiero extraer datos del archivo fuente para mostrarlos en el archivo A. Así que he establecido un enlace entre los dos archivos. Sin embargo, era necesario abrir el archivo fuente para que el archivo A se actualizara.

Así que escribí el siguiente código, que logré obtener con la ayuda de un usuario:

Sub ImportarDatosSinAbrir()

'Declaración de variable de ruta y nombre como texto
Dim RutaFuente As String
Dim ArchivoFuente As String

'Definición del contenido de la variable
RutaFuente = "I:\G_AMEC\ETAT AMEC2\Estado AMEC 2 \" '
ArchivoFuente = "Estado AMEC 2 (versión 2).xlsm"

'Creación de un rango de recuperación de datos a partir del archivo fuente cerrado, de la hoja de cálculos y del rango de celdas deseado
ThisWorkbook.Names.Add "rango", _
RefersTo:="='" & RutaFuente & "[" & ArchivoFuente & "]calculs'!H9"

Con Worksheets("RECAP") ' hoja del archivo A

Worksheets("RECAP").Range("F49").Value = "=rango"
End With

End Sub

Pero este código muestra 0 y no el valor deseado... ¿Tienen alguna idea?

Gracias de antemano