<HTML>Evidemment, je ne vois pas le moyen de faire ça sans VBA.
J'ai trouvé une fonction (GetValue) bien commode sur un site et en mettant ce code dans un module, ça devrait marcher :
Private Function GetValue(chemin, ref)
Dim arg As String
arg = chemin & Range(ref).Range("A1").Address(, , xlR1C1)
GetValue = arg
GetValue = ExecuteExcel4Macro(arg)
End Function
Sub Macro1()
lig = Columns(1).Find("", [A65536], , , xlByRows, xlNext).Row
a = "'C:\Mes Documents\Excel\aide\[Excel T2.xls]Feuil1'!"
b = "A1"
Cells(lig, 1) = GetValue(a, b)
End Sub
(à la place de a tu mets bien sûr le chemin et le nom de ton classeur et de la feuille correspondante)</HTML>