Can below piece of code be converted to use the "Cells" property:

Code
-------------------
Range("B55:D55,I55").Selec
-------------------


I have a following piece of code used to determine range for a chart:

Code
-------------------
Set myrange = Worksheets("Chart").Range(Cells(startx, column), Cells(weekx, column)
-------------------

but I would like to add a second range to it - like the cell "I55" in:

Code
-------------------
Range("B55:D55,I55").Selec
-------------------

As I'm using variables to determine the range I need to use the "Cells
property!
Is this possible!? :

--
jop
-----------------------------------------------------------------------
jopu's Profile: http://www.excelforum.com/member.php...fo&userid=1662
View this thread: http://www.excelforum.com/showthread.php?threadid=31485

Hi jopu

Try this

Union(Range(Cells(55, 2), Cells(55, 4)), Cells(55, 9)).Select


--
Regards Ron de Bruin
http://www.rondebruin.nl


"jopu" wrote in message ...

Can below piece of code be converted to use the "Cells" property:

Code:
--------------------
Range("B55:D55,I55").Select
--------------------


I have a following piece of code used to determine range for a chart:

Code:
--------------------
Set myrange = Worksheets("Chart").Range(Cells(startx, column), Cells(weekx, column))
--------------------

but I would like to add a second range to it - like the cell "I55" in:

Code:
--------------------
Range("B55:D55,I55").Select
--------------------

As I'm using variables to determine the range I need to use the "Cells"
property!
Is this possible!? :(


--
jopu
------------------------------------------------------------------------
jopu's Profile: http://www.excelforum.com/member.php...o&userid=16621
View this thread: http://www.excelforum.com/showthread...hreadid=314859

Note to OP...

Be carefull with mixing qualified references and global references
to cells.

Set myrange = Worksheets("Chart").Range(Cells(startx, column),
Cells(weekx, column))

will pickup the GLOBAL cells (activesheet) NOT the cells of
Worksheets("chart")


use:

with worksheets("chart")
union( .cells(55,2).resize(,3),.cells(55,9))
end with



--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Ron de Bruin wrote :

Hi jopu

Try this

Union(Range(Cells(55, 2), Cells(55, 4)), Cells(55, 9)).Select