Option Explicit Function RetrieveRangeForName(psRange As String) As String Application.Volitile RetrieveRangeForName = Range(psRange).Address End Function