Public Function MimicGlobalRange(RangeRef As String) As Range
'Seems to behave the same as Application.Range
Dim tempRange As Range
On Error Resume Next
'Try ActiveSheet.Range - RangeRef is address or sheet defined name (that refers to a RANGE on the SAME sheet) internal to ActiveSheet: "A1" or "Sheet1!A1" or "[Book1]Sheet1!A1" or "A:A 1:1"
Set tempRange = ActiveSheet.Range(RangeRef)
If Not tempRange Is Nothing Then
Set MimicGlobalRange = tempRange
Exit Function
End If