Mega Code Archive
Retrieving Values Stored as a Workbook Name Using the Evaluate Method
Sub TestWorkbookNameValue()
Dim vValue As Variant
vValue = Application.Names("SalesTaxRate").RefersTo
Debug.Print "Value retrieved using RefersTo: " & vValue
End Sub