B
Bythsx-Addagio
Hello,
I am using the below code to prompt the user to select a range of cells. My
problem is that the resulting range is ignoring any workbook reference. If
you select a range on a different workbook it ignores that in the following
function.
How can I capture the absolute reference?
Thanks in advance!
Set varRange = _
Application.InputBox("Select a range of cells:", Type:=8)
If IsObject(varRange) = False Then Exit Sub
RangeAddress = varRange.Address
' Call nested function to return list of unique items
varUniqList = UniqList(Range(RangeAddress))
I am using the below code to prompt the user to select a range of cells. My
problem is that the resulting range is ignoring any workbook reference. If
you select a range on a different workbook it ignores that in the following
function.
How can I capture the absolute reference?
Thanks in advance!
Set varRange = _
Application.InputBox("Select a range of cells:", Type:=8)
If IsObject(varRange) = False Then Exit Sub
RangeAddress = varRange.Address
' Call nested function to return list of unique items
varUniqList = UniqList(Range(RangeAddress))