I want to retrieve some values from an existing Workbook to another one (Two
..XLS files)

What I am doing works, but isn't quite what I want.
After I retrieve a value on a workbook in another directory from other
workbook in a different directory, I get the value on the cell, but if you
mouseover the function it displays the following link:
='D:\directory\[excelfile.xls]Accounting'!$A$12

****I want the value, not the formula I use to get the data. Does .Evaluate
works?****

I use this code to retrieve and save the data:
Public Sub procInserirDados()
....
For n = 7 To 13
h = n
For Each Dados In objFolha(2).Range("A" & n)
objFolha(2).Range("A" & n).Value = _
"='" & strDirectory & "[" & strFile & "]" & strWorkbook &
"'!$A$" & h + 1
Next Dados
Next n
....
end sub