Ranges into an array.......why doesn't this code work?

  • Thread starter Thread starter Tommy
  • Start date Start date
T

Tommy

Hi guys,

I have two ranges which are stored in an array, Series(1) and
Series(2). I then create a union range:

Set RangeTemp = Application.Union(Series(1), Series(2))

'''So now, RangeTemp holds my range.

'''To check that the range selects ok:

RangeTemp.Select

'''' I also defined:

Dim OverallSelectionRange(1 To 6) As Variant

OverallSelectionRange(2) = RangeTemp

OverallSelectionRange(2).Select <-- This line gives me the error:
'Object Required'


As you can see, I want to assign the range stored in RangeTemp to the
second OverallSelectionRange array element. That line works, but then
the last line gives me the Object Required error. Why is this?? Surely
I am simple assigning a range into that element of the array? Why
doesn't this work?

Regards and thanks,

Tom
 
if you want to put a Range Object variable into a variant use

dim vObj as variant

Set vobj=Range("A1:A3")
msgbox vobj.address

vObj now contains a range object, which is just a pointer to the range on
the worksheet

But if you want to retrieve the values from the range into a variant
containing an array then use

dim vArr as variant

varr=Range("A1:A3")
msgbox Varr(1,1)
msgbox varr(2,1)

varr now contains a 2 -dimensional array, 3 rows by 1 column, which contains
the values from the range: its not a range object so trying something like
vARR.Address wil give you "Object required"


Charles
__________________________________________________
Outlines for my Sessions at the Australia Excel Users Group
http://www.decisionmodels.com/OZEUC.htm
 
Tommy said:
. . .
Dim OverallSelectionRange(1 To 6) As Variant

OverallSelectionRange(2) = RangeTemp

OverallSelectionRange(2).Select <-- This line gives me the error:
'Object Required'
Click to expand...

The Select method works on ranges (and other objects), but not on
arrays, which is what OverallSelectionRange is.

Alan Beban
 
I wonder how do you have an array Series storing ranges.
If this was done without problem, i think you could apply the same method to
OverallSelectionRange.

I think it might be something like
Set OverallSelectionRange(2) = RangeTemp

keiji
 
Back
Top